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SEQ 0001 , 


IDENTIFICATION 
PRODUCT CODE: AC=T443A-MC 
PRODUCT NAME: CNDZAAO DZV11 DIAG PRT1 
PRODUCT DATE: DEC, 1982 
MAINTAINER: DIAGNOSTIC SERVICES/ISS 
AUTHOR : BRUCE LUHRS 


Ma INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE - oy T CONS 


D_ NOT BE 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


THE SOF TWARE ite HF IN THIS DOCUMENT IS FURNISHED UNDER A 
LICENSE AND MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE 
TERMS OF SUCH LICENSE. 

oe EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE 
USE RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT 
SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1982,1983 DIGITAL EQUIPMENT CORPORATION 


a at te ee Or ree 
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| ‘. ABSTRACT 

THE FUNCT LON OF THE DZv11 DIAGNOSTICS I$ TO VERIFY THE OPTION OPERATES 
FICATIONS. THE DIAGNOSTICS ALSO VERIFY THAT THE DZV11 
VIRONMENT SUCH AS THE SYSTEM IN WHICH IT IS INSTALLED. 


PARAMETERS MAY BE SUPPLIED 7@ 7¥E PROGRAM BY EITHER ‘AUTO SIZING’ OR 
INPUT FROM THE USER ON THE CONSOLE BY HAVING SWOO=1 AT START TIME. AUTO 
SIZING — BE DONE "a. THE FIRST TIME THE PROGRAM 3S STARTED AND 


sw07=0 Sw00= Sw03 SI 

dZVv11 DEVICE ADDRESSES AND VECTORS ONLY. ALL REMAINING PARAMETERS WILL 
DEFAULT TO CERTAIN VALUES (SEE SEC.8.5). CONSOLE INPUT MAY BE CONTROLLED 
AT ANY START TIME THROUGH THE USE OF SWO00,S Sw04, W06 (SEE SEC. 
4.1.1 FOR A DETAILED DESCRIPTION OF THESE Sulitnes) 


CURRENTLY THERE ARE THREE STANDALONE DIAGNOSTICS (CNDZA,CNDZB,AND CNDZC) 
ONE SYSTEM MODULE FOR DEC X/11 (CXDZBA), AND AN OVERLAY FOR ITEP (CVDZD). 


CNDZA Bg aly WITH CNDZB WILL TEST ALL LOGICAL FUNCTIONS OF THE DZV11 


CNDZC_IS DESIGNED AS_A NON-CHAINABLE STANDALONE DIAGNOSTIC PROVIDING THE 
OPERATOR WITH DIRECT CONTROL OVER THE TESTING OF ALL DZ2V11 EJA CABLES. 


SAE AAAAAAAAAAAAAAAAAAEAARERAAAAAAEAEAAAAAAEAEREREAAAAEAAERAAAAAAEREREEE 


* *;GPA * 
* NOTE: THIS DIAGNOSTIC HAS BEEN MODIFIED TO RUN IN KXT11 (SBC 14954) * 
“ BASED SYSTEMS. 


® 


sBC 11/21 

CSR RANGE: 174000 TO 177770 

VECTOR RANGE: 300 TO 370 

AUTO_SIZING FOR 

CSR AND VECTOR: DISABLED 
POST I IIIT CITT SI TTI T CLIT ITI TIT Ii TTT iii iii titi titett eter iti iiiiii iti iit) 
2. REQUIREMENTS 
2.1 EQUIPMENT 

AN LSI11 CPU WITH MINIMUM 4K OF MEMORY. 

ASR 33 (OR EQUIVALENT FOR CONSOLE) 

DZv11 INTERFACE MODULE 

H329 STAGGERED TURNAROUND CONNECTOR. 

H325 CABLE TURNAROUND CONNECTOR. 


NOTE: A STAGGERED TURNAROUND CONNECTOR IS NEEDED IN ORDER TO TEST THE 
PARITY LOGIC. 


SEQ 0002 





CNDZ 
CNDZ 


LO 
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2.2 


3.1 


tet 
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STORAGE 


PROGRAM WILL USE ALL 4K OF MEMORY EXCEPT WHERE ABL AND BOOTSTRAP ae 

RESIDE. LOCATION 1500 THRU 1740 ARE ESPECIALLY TO BE wa | AND TO BE 

yh sa BY OPERATOR AFTER PARAMETERS — BEEN INPUT CONSOLE 

=1); OR AFTER THE ‘AUTO SIZING’ HAS BEEN DONE. THESE LOCATIONS 

MAY BE CHANGED IF THE USER UNDERSTANDS MTMETR MEANING AND DIFFERENT 
PARAMETERS ARE REQUIRED. 


LOADING PROCEEDURE 

METHOD 

ALL PROGRAMS ARE IN ABSOLUTE FORMAT wy ARE LOADED USING THE ABSOLUTE 
LOADER. NOTE: IF THE DIAGNOSTICS ARE ON A MEDIA SUCH AS DISK 
eMAGTAPE ,DECTAPE, OR CASSETTE; FOLLOW INSTRUCTIONS FOR THE MONITOR 
WHICH HAS BEEN PROVIDED ON THAT SPECIFIC MEDIA. 


ABSOLUTE LOADER STARTING ADDRESS *500 


MEMORY * SIZE 
4k 17 

8k 37 

12k 7 
-16K 7 

OK 


2 117 
24k 137 
28k 157 


STARTING THE PROCESSOR AT THE ABSOLUTE LOADER STARTING ADDRESS WILL LOAD 
THE DIAGNOSTIC INTO MEMORY. 


sss sss 


SEQ 0003 


SC 


es % 
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4. STARTING PROCEEDURE “oot 


A. SET SWR TO ZERO FOR ‘AUTO SIZING’ OR SET ‘$w00= 1 FOR USER PARAMETER 

INPUT FROM CONSOLE TERMINAL. NOTE: LOC. 000176 IS USED AS A SOFTWARE 
SWITCH REGISTER IN ALL OF THE DZV11 oe he (SEE SEC. 4.1 )- 
ON THE FIRST STARTUP OF IF SwWO7=1 AND Sw00 


THE DIAGNOSTIC =0 Hg | 
PROGRAM WILL ASSUME THAT THE STATUS TABLE ay me ALREADY BUILT 
FROM A PREVIOUS DZV11_ DIAGNOSTIC RUN. NOTE: Y DIviT DIAGNOSTIC 


WILL OVERLAY THE STATUS TABLE WHEN tt bs PRESERVE ITS CONTENTS 
AND THUS WILL NOT ALTER A PREVIOUSLY BUIL BLE. 

B. START THE DIAGNOSTIC AT LOC. 200(8). THE PROGRAM WILL TYPE MAINDEC 
AND PROGRAM NAMES (IF THIS WAS THE FIRST START UP OF THE PROGRAM) 
ne Oh eceet FOLLOWING: (ON THE FIRST PROGRAM RUN OR IF PARAMETERS 


*MAP OF ory) STATUS’ 
1500 
02 090500 


THE "Ox a 3 AN EXAMPLE! THIS WOULD INDICATE 3 STATUS TABLE 
STARTING AT 1500 IN THE PROGRAM. THE STATUS TABLE MUST BE 
VERIFIED BY THe USER IF AUTO eee IS DONE. FOR INFORMATION OF STATUS 
TABLE SEE SECTION 8.4 FOR HELP 
THE PROGRAM WILL TYPE "'RUNNING'’ AND PROCEED TO RUN THE DIAGNOSTIC. 

4.1 CONTROL SWITCH SETTINGS 


NOTE: THIS PROGRAM UTILIZES A SOFTWARE ag th ye take WHICH MAY BE 


MODIFIED BY CHANGING LOC. 176 OR BY TYPING CONTROL ‘'G’’ (*G) ON 
THE CONSOLE TERMINAL WHILE THE PROGRAM IS RUNNING. 

SW 15 SET: HALT 

SW 14 SET: LOOP ON C EST 

SW 13 SET: INHIBIT ERROR PRINT OUT 

SW 12 SET: INHIBIT **ALL** TYPE OUT/BELL ON ERROR. 

Sw 11 Set: INHIBIT Seat teal (CUiCK PASS) 

SW 10 SET: ESCAPE TO NEXT TEST 

SW 09 SET: LOOP WITH CURRENT DATA 

Sw 08 SET: CATCH ERR 


: LOOP ON IT 
SW 07 SET: NO AUTO SIZE. 4 1ST START OF PROGRAM AFTER LOADING AND 
IF Sw00=0 ae THE PROGRAM WILL ASSUME THAT THE STATUS MAP 
HAS BEEN BUILT FROM A PREV 10US- DZV11 DIAGNOSTIC RUN. 

Re cehtes DzviT' Ss DESIRED ACTIVE 

SELECT DELAY PARAMETER (see SEC. e: 2 fe 1) 

EXTRA PARAMETER INPUT (SEE SEC. 4.1.1) 

LOCK ON SELECTED hg 
RESTART PROGRAM AT SELECTED TEST 
GET USERS PARAMETERS FROM CONSOLE 





tte a = o— 
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SWITCH REGISTER CONTROL OF PARAMETER INPUT FROM CONSOLE 


Sw 00 


Sw 03 


Sw 04 


GET USERS PARAMETERS FROM CONSOLE. petites THIS gg Be AT START 
UP TIME ALLOWS THE USER TO INPUT AT THE CONSOLE T NAL__ THE 
at onattie BASE DEVICE ADDRESS 


FAUL E FOLLOWING PARAME ALL 4 LINES ET TO 
2 te ON EACH DZV11, THE DEFAULT BAUD RATE IS SET AT 19.2 KBAUD 
ND THE CHARACTER LENGTH FOR THE MAJORITY OF TESTING IS SET AT 
EIGHT BITS PER CHARACTER WITH TWO STOP BITS. 


EXTRA PARAMETER INPUT. SETTING THIS SWITCH AT START UP TIME 
PROVIDES THE USER WITH THE ABILITY TO SET THE LINES ACTIVE FOR 
TESTING AND TO SET THE DEFAULT BAUD RATE USED FOR THE MAJORITY 
OF THE DIAGNOSTIC TESTS. THE DELAY PARAMETER IS AUTOMATICALLY 
ADJUSTED TO THE BAUD RATE GIVEN BY THE USER. 


SELECT DELAY PARAMETER. THE ey PARAMETER THIS SWITCH CONTROLS 


CHARACTER TO BE COMPLETELY TRANSMITTED OR RECEIVED. THIS DELAY 
COUNT IS AUTOMATICALLY SET TO PROVIDE ENOUGH DELAY TIME FOR THE 
DEFAULT BAUD RATE SPECIFIED WHEN RUNNING THE PROGRAM ON AN LSI11 
WITH MOS MEMORY. WHEN RUNNING THIS Bee ge ON A_ PROCESSOR 
WITH A_FASTER MEMORY SPEED THIS DELAY COUNT SHOULD BE ADJUSTED 
a eee as FOLLOWING DEFAULTED VALUES: 


e FOR 
TIME FOR BA 
1120 sTIME FOR 110 BAUD 
0750 sTIME FOR 1 UD 
60 sTIME FOR 150 BAUD 
0330 sTIME FOR 300 BAUD 
0150 TIME FOR BA 
0 sTIME FOR 1200 BAUD 
0040 TIME FOR 1800 BAUD 
0030 sTIME FOR 2000 
0020 sTIME FOR 2400 
0010 sTIME FOR 3600 BAUD 
0001 zTIME FOR 4800 BAUD 
0001 sTIME FOR 7200 
0001 sTIME FOR 9600 BAUD 
0001 TIME FOR 19.2 KBAUD 


SEQ 0005 





r 
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4.1.2 SWITCH REGISTER RESTRICTIONS 


Sw 06 te ey DZV11°S DESIRED ACTIVE. A MESSAGE IS TYPED OUT ON THE 
SOLE TERMINAL ASKING THE OPERATOR TO TYPE A BIT MAP OF THE 
bev" S DESIRED ACTIVE. USING THIS SWITCH ALLOWS LOCATION DZVACTV 

TO BE ALTERED (SEE SEC. 8.3 FOR A DESCRIPTION OF THIS LOCATION). 


EXAMPLE : 
IF THE DEVICES CORRESPONDING TO THE DZV11°S NUMBERED ZERO, TwO, 
oe TESTED. Tv N THE DZV11 ” ieee MAP (LOC. 1500 THROUGH 1740) ARE TO 


YPE IN: 
THIS WILL set BITS Z TWO, AND FOUR IN LOCATION DZVACTV. ALL 
REMAINING DEVICES IN ere STATUS MAP WILL THEN NOT BE TESTED. 


SW 01 RESTART PROGRAM AT SELECTED TEST IT IS STRONGLY SUGGESTED 
THAT _AT_LEAST ONE PASS HAS BEEN MADE BEFORE TRYING TO SELECT A 
TEST THAT IS NOT IN THE ORDER OF SEQUENCE THE REASON 
T THE PROGRAM HAS 10 AS_AND 


BEING 
HAT ARE ARAMETERS. 
NOTE: IF RUNNING MULTIPLE DZV11°SATHE DZV11 YOU DESIRE TO BE 
UNDER TEST MUST BE yng + THE USE OF SWO6 BEFORE LOCKING ON 
THE TEST. IN OTHER WORDS ACH TIME THE PROGRAM IS _ STARTED; 


THE FIRST DZV11 WILL BE SéLecteD TO BE UNDER TEST UNLESS SW06 JS 
USED TO SELECT ONLY ONE. 


SW 09 LOOP ON CURRENT oars THIS yh WILL ONLY WORK JF _ CALL 
IS INT TEST. THE REASON BEING THAT MOST TESTS DEAL 
WITH BLOCKS OF DIFFERENT DATA Lo BE re OR RECEIVED ALL AT ONCE 
THUS IN BLOCK DATA, ONE PATTERN CAN'T BE SINGLED OUT. 
THIS SWITCH IS DESIGNED TO PROVIDE AN ox FOR A TRAINED TROUBLE- 
SHOOTER TO SAMPLE VARIOUS SIGNALS ON THE MODULE AND IS NOT MEANT 
TO BE USED AS A GENERAL USER CONTROL SWITCH. 


SW 04 SELECT DELAY PARAMETER: THIS SWITCH SHOULD BE USED WITH CARE 
eS ser if 2 yaad WILL CAUSE VALID TESTS TO FAIL. 


cna 
| 
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SWITCH REGISTER PRIORITIES 
ERROR SWITCHES 


1. Sw 1 DELETE PRINT OUT/BELL ON ERROR. 
° Sw 1 DELETE ERROR PRINTOUT. 
3. SW 15 HALT ON THE ERROR. 
4. Sw 08 GO TO BEGINNING OF THE TESTCON ERROR). 
5. SW 10 GOTO NEXT TEST(ON ERROR). 
SCOPE SWITCHES 
1. Sw 09 (IF ENABLED BY ‘SCOP1"). IF AN °** IS PRINTED m FRONT OF 


THE TEST NO. ON AN ERROR REPORT (EX. *TEST NO. 10 ) SWO9 IS 
INCORPORATED IN THAT TEST AND THEREFORE swo9 IS otysualtys THE 
BEST rou TcH FOR THE SCOPE LOOP (SW14=0, Sw10=0 9=1, SwO8=0) 
IF THE PROGRAM USER IS TECHNICALLY TRAINED to” vrecthOnicaee 
ISOLATE SIGNAL PROBLEMS ON THE DZV11 MODULE. 
IF $wWwO9 IS NOT ENABELED; AND THERE IS A *HARD* ERROR 
(CONSTANT); SWO8 IS BE 

2. FOR INTERMITTENT ERRORS EITHER START THE PROGRAM WITH SWO1 AND 
SwO2 SET WHICH WILL ALLOW THE USER TO LOCK ON A SELECTED TEST, 
OR ELSE SET SW14 AS AN ERROR IS BEING TYPED OUT ON THE TERMINAL. 
SW14 WILL CONTINUE TO LOOP ON THAT TEST REGARDLESS OF WHETHER AN 
ERROR OCCURS. 

3. SW 14 LOOP ON CURRENT TEST. 


STARTING ADDRESS 

SA 200 - THE STARTING ADDRESS FOR ANY DZV11 DIAGNOSTIC IS LOC. 200 

NOTE: IF ADDRESS seeeeee IS a THE PROGRAM ASSUMES IT IS_ UNDER 
ACT11 OR P CONTROL WILL ACT ACCORDINGLY. AFTER *ALL* 
want DrvI1S ARE TESTED THE PROGRAM WILL RETURN TO ‘XXDP" OR 

OPERATING PROCEEDURE 


WHEN THE PROGRAM IS INITIALLY STARTED, MESSAGES AS DESCRIBED IN SECTION 
FOUR WILL BE PRINTED AND THE DIAGNOSTIC WILL BEGIN RUNNING. 


SEQ 0007 
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NORMAL START OF DIAGNOSTIC 


ON THE FIRST START OF THE DIAGNOSTIC AT ADDRESS of hs IF SwO00=1 
THEN THE FOLLOWING QUESTIONS ARE ASKED AND MUST BE ANSWERED: 


“1ST CSR ADDRESS ao ga oy 163770): °** 
YOU MUST TYPE IN THE FIRST DZV11 CSR IN THE SYSTEM YOU WISH 
TESTING TO BEGIN AT. RANGE: 160000:163770 


"IST VECTOR ADDRESS (300:770): °° 
YOU MUST TYPE IN THE VECTOR OF THE FIRST DZV11 IN THE SYSTEM 
UNDER TEST. RANGE 300:770 


“MAINTENANCE MOD 


nem 
— i i 
Kyte 


CINTE 
[STAGGERED <H329> 

TYPE “OR “"I'* OR “'S"* DEPENDING ON WHICH MODE YOU WISH TO. RUN 
IN. IF RUNNING “EXTERNAL “s ALL SELECTED LINES MUST BE 
TERMINATED BY AN H325 TEST CONNECTOR 


*# OF DZV11°S <IN OCTAL> (1:20): °° 
TYPE TOTAL NUMBER OF DZV11°S TO BE TESTED IN THE SYSTEM. RANGE 
IS 1 THRU 20 IN OCTAL. 


eeneeeeee JF SWO5=1 THEN THE FOLLOWING WILL BE PRINTED eexeennee 


“LINES g ky BY BIT <IN OCTAL> rt 8 iy 4 - 
EACH BIT REPRESENTS A LINE AND ANY COMBINATION OF LINES MAY BE 
SELECTED (HOWEVER IN STAGGERED ¥ MODE TWO ADJACENT LINES MUST BE 
SELECTED (0-1, 2-3). 


“DEFAULT Ay RATE <IN OCTAL> (00:17): °° 
THIS GIVES THE USER A CHANCE TO CHANGE THE DEFAULT BAUD RATE 
IN APP. 90% OF THE TEST, Bayo RATE FROACES ARE: 


*‘00°° "01°" 75 BAUD),'‘02°*( 110 BAUD) ,*'03"" BAUD), 
"04°C 150 BAUD) ,°'05°" BAUD) ,°°06°" BAUD) ,“°07°°(1200 BAUD), 
**10°°(1800 BAUD) ,“°11°°(2000 BAUD) ,°°12°°(2400 wr tf **13°'(3600 BAUD) 


*"14°(4800 BAUD).''15°(7200 BAUD) .'16''(9600 BAUD) .°17°(19.2 KBAUDS 
LOW DEFAULT BAUD RATES ARE NOT SUGGESTED SINCE  tHEY LENGTHEN THE 
TIME TO COMPLETE A PROGRAM PASS DRAMATICALLY. 


IT IS IMPORTANT TO NOTE THAT ALL A sA) be S_IN THE SYSTEM MUST BE 
CONTIGIOUS FOR BOTH ADDRESS D VECTORS. ALSO ALL THE EXTRA 
PARAMETERS OTHER — CSR AND VECTORS ARE GIVEN TO THE EXISTING 


DZV11°S IN THE SYS 

IF THE MODE OF OPER ATION IS DIFFERENT - naee DZV11_ THIS MUST 

BE tts INTO THE CORRECT STATUS MAP ENTRY WHICH IS PRINTED AT 

START TIME. AN ALTERNATIVE IS TO PUT SuO0= 1 AT START TIME; 

ANSWER QUESTIONS ABOUT orvt UNDER TEST AND INDICATE ONE pzvii 
MAP TO BE ‘PATCHED MUST BE 


I 
DONE AFTER THE QUESTIONS ARE ANSWERED OR AFTER THE AUTO SIZE. 


SEQ 0008 


peteonenensanecrmecetererevncnsueeteaeesreeessdtntesaeenetimarettsens ns nbn 
Jo1 
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5.2 PROGRAM AND/OR OPERATOR ACTION 


THE VARIETY OF PROGRAM CONTROL SWITCHES PROVIDED IN THIS DIAGNOSTIC 

PACKAGE IS DESIGNED TO PROVIDE THE USER WITH A WIDE RANGE OF TR 

af TECHNIQUES. BEFORE THE USER ATTEMPTS TO RUN THIS DIAGNOSTIC HE 
HOULD BECOME FAMILIAR “ine THE USE OF <n | a SWITCHES AND THEIR 

RESTRICTIONS. (SEE SEC. 4.1, 4.1.1, 4.1.2, 4.1.3) 


+a THE corinne DETECTS -yh ERROR THE TEST NUMBER AND PC WILL BE TYPED 


HEN L N T TEST 
PC OF THE ERROR REPORT. THE REASON FOR THE ERROR REPORT WILL BECOME 
CLEARER WHEN READING THE COMMENTS IN THE PROGRAM LISTING. 


6. ERRORS 


| 

| 
AS a "rine an THERE WILL ALWAYS BE A_TEST NUMBER AND PC_ TYPED 
OUT THE TIME OF AN ERROR (PROVIDING SW 13=0 AND SW 12=0). IN MOST 
CASES NADDITIONAL INFORMATION WILL BE SUPPLIED TO THE THE ERROR MESSAGE 
WHICH IS TO GIVE THE OPERATOR AN INDICATION OF THE ERROR. 


6.1 ERROR RECOVERY 


IF FOR SOME REASON THE DZV11 SHOULD ‘HANG THE BUS* (GAIN CONTROL OF BUS 
SO THAT CONSOLE MANUAL FUNCTIONS ARE INHIBITED) AN INIT OR POWER DOWN/UP 
IS NECESSARY FOR OPERATOR TO REGAIN CONTROL OF CPU. IF THIS SHOULD 
HAPPEN, L IN LOCATION ‘"STSTNM’ (ADDRESS 1246) FOR THE NUMBER OF THE- 
TEST THAT WAS RUNNING AT iy TIME OF THE CATASTROPHIC ERROR. IN THIS 
ea tg HAVE AN IDEA AS TO WHAT THE DZV11 WAS DOING AT THE. 


~ 
. 


v. RESTRICTIONS 
7.1 STARTING RESTRICTIONS 


SEE SECTION 4.1.2 

he STATUS TABLE SHOULD BE VERIFIED REGARDLESS OF HOW THE PROGRAM WAS 
STARTED. ALSO IT IS _ IMPORTANT TO USE THIS LISTING ALONG WITH THE 
INFORMATION PRINTED ON THE TTY TO COMPLETELY ISOLATE PROBLEMS. 
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OPERATING RESTRICTIONS 
PARAMETER MUST BE INPUT FROM USER OR APT IF “AUTO SIZING’ IS NOT USED. 


MISCELLANEOUS 
EXECUTION TIME 


ALL DZV11 wy DIAGNOSTICS WILL y +4 “ "END PASS" MESSAGE (PROVIDING 
ERRORS AND SW12=0) WITHIN 2 ™ THIS IS ASSUMING SW11=1 (INHIBIT 
ITERATIONS) IS SET TO GIVE THE FASTEST “POSSIBLE EXECUTION. 


PASS COMPLETE 


NOTE: *EVERY* TIME THE PROGRAM IS STARTED; outt TESTS WILL RUN AS_ IF 
Sw11 ay gt ITERATIONS) WAS UP (=1). THIS IS TO VERIFY NO *HARD* 
ERRORS' SOON AS POSSIBLE. THEREFORE | THE FIRST PASS TIME 
PROGRAM ts STARTED= WILL BE A ‘QUICK PASS* UNTIL ALL DZV11° § IN SYSTEM 
ARE TESTED. WHEN THE DIAGNOSTIC HAS COMPLETED A PASS THE FOLLOWING IS 
AN EXAMPLE OF THE PRINT OUT TO BE EXPECTED. 


END PASS CNDZA-A CSR: 160100 VEC: 300 PASSES: 000001 ERRORS: 000000 


NOTE: THE NUMBERS FOR CSR AND VEC ARE NOT NECESSARILY THE VALUES FOR 
THE DEVICE. THEY ARE ONLY FOR THIS EXAMPLE. 


SEQ 0010 


oo rr 
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8.3 KEY LOCATIONS 


SLPADR (1252) CONTAINS THE ADDRESS WHERE PROGRAM WILL RETURN WHEN 
hecearege COUNT IS REACHED OR IF LOOP ON TEST IS 


SERTED 
NE (1362) CONTAINS THE ADDRESS OF nee NEXT TEST TO BE PEFORMED. 
STSTNM (1246) CONTAINS THE NUMBER OF THE y 2} NOW BEING PEFORMED. 

RUN (1412) ~ 4 tat ~~ ‘a ALWAYS POINTS ONE PAST THE hos 


CUR ING TESTED. EXAMPL UN) 
1412/0000090001000000 MEANS THAT DZV11 NO. 5 is THE prvi 


(DECIMAL) DZV11S SEQUENTIALY. THEY CONTAIN THE 
CSR. “sat AND STATUS CONCERNING THE CONFIGURATION OF 
DZVACTV(1406) EACH BIT SET IN THIS. _LOCATION INDICATES THAT THE 
ASSOCIATED D02ZV11 WILL TESTED IN TURN. EXAMPLE: 

(ozvacTy) + 1s067000000009001111 MEANS THAT DZV11_ NO. 

02 BE TESTED. EXAMPLE: (DZVACTV) 

146676006006000010001 MEANS THAT 0211 NO. 00,04 WILL BE 


| 
| 
| 
| 
| (1500)=(1740) 
sg 3 webs ge CONTAIN THE INFORMATION NEEDED TO TEST 
SBASE (1174) ama THE RECEIVER CSR OF THE CURRENT DZV11 UNDER 


ee 
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8.4 MORE ON THA’ "STATUS TABLE’ (1500-1740) 


*MAP OF oeyt STATUS* 
00 00 


45 1601 

1502 000300 
1504 000017 
1506 017470 
1510 000000 


THE ABOVE INFORMATION WILL BE os ta FOR — OF UP TO 16 DZV11°S IN 
Ht, 3 we oS ts WILL FOLLOW UNDER THIS TABLE). P 
1500 160100 THIS I 


1502 
1504 
1506 
1510 
| 


EXPLAN 
iad sterEn. SYSTEM CONTROL REGISTER FOR THE ist DZV11 IN 
000300 THIS IS VECTOR ‘A® FOR THE FIRST DZV11 IN THE SYSTEM. 

000017 gs eS THE BINARY REPRESENTATION OF WHAT LINES ARE TO 


BE TESTED. 

017470 THIS IS THE PARAMETER LOCATION USED IN MOST OF THE 
TESTS. _IT INDICATES PARAMETERS a : RX *. as 33 SELECT 
17 (19,2K BAUD) EIGHT BITS PER CHAR, AND TWO STOP BITS. 
THE USER MAY ALTER THE STOP BITS nip iL SPEED, "eur THE 
REMAINING PARAMETERS SHOULD BE LEFT ALONE 
THIS LOCATION IS USED TO LOAD THE DZ2V11 LINE PARAMETER 
REGISTER FOR “ee LINE. THE al tune OF THE BITS SET _IN 
THIS LOCATION IS THE SAME AS THE FUNCTION OF THE RELATED 
BITS IN THE DEVICE LINE PARAMETER REGISTER. 

000000 hae ¢ LOCATION WILL CONTAIN EITHER ALL ZEROS INDICATING 


E 
IT WILL CONTAIN 100000 INDICATING THAT “STAGGERED MODE*’ 
WAS SELECTED OR IT WILL CONTAIN 000200 INDICATING THAT 
“EXTERNAL WAS THE MODE SELECTED. 


THE ABOVE IS a citt FOR EACH DZV11 IN THE SYSTEM. THE TABLE IS 
FILLED BY AUTO SIZING OR BY THE MANUAL PARAMETER INPUT ——— 
AS ab ae PREVIOUSLY. ALSO IF DESIRED BY_ USER; THE 
LOCATIONS MAY BE ALTERED BY HAND TO SUIT THE SPECIFIC 
CONFIGURATION. 


SEQ 0012 


ee ——_——- + ee SC- — a —_——— 
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'B.5 see METHOD OF AUTO SIZING *** 
8.5.1 FINDING THE CONTROL STATUS REGISTER. 


THE PROGRAM WILL START AT ADDRESS 160000 AND a. *REFERENCING’ THE 
ADDRESS IN THE POINTER. IF A NON-EX MEMORY TRAP OCCURES, THE POINTER 
(HOLDING 160000) IS UPDATED BY 10 AND "THE ABOVE IS REPEATED UNTIL 
ADDRESS 163770 IS REACHED. IF A “BUS REPLY’ RESPONSE WAS ISSUED BY THE 
DZV11 (OR ANY OTHER DEVICE) (NO NXM TRAP), “MASTER SCAN ENABLE’’ IS 
o. torn TO BE SET AND THE TCR BITS 47 ALL FOUR LINES ARE SET. ‘‘TRDY’’ 


OVE WOR VICE I D 
IF ANY OF THE ABOVE FAILED, UPDATING OF THE POINTER IS DONE AND 
SEQUENCE IS REPEATED. 

NOTE: IF THE PROGRAM DOES NOT FIND YOUR DZV11, SOMETHING IS WRONG AND 
AUTO SIZING SHOULD NOT BE DONE. 


8.5.2 FINDING THE VECTOR 


THE VECTOR AREA (ADDRESS ee IS FILLED WITH THE INSTRUCTION IOT AND 

+2° (NEXT ADDRESS). 6B1T14 AND BITS (TX INTERUPT ENABLE AND MSTSCAN 
ENABLE) ARE SET INTO THE DZVCSR. ALL TCR BITS ARE SET, A DELAY OCCURS, 
AND_IF NO INTERUPT ery (BECAUSE OF A BAD DZV11) THE PROGRAM a8 a 
VECTOR + yg 32 300 AND THe PROBLEM SHOULD BE FIXED IN THE DIAGNOSTIC. 
ONCE THE PROBLEM IS PIXED, THE PROGRAM SHOULD BE SETUP AGAIN TO SET THE 
CORRECT VECTOR. IF AN INTERUPT OCCURRED, THE ADDRESS TO WHICH THE DZV11 
INTERUPTED TO IS PICKED UP AND REPORTED AS THE VECTOR. NOTE: IF THE 
VECTOR REPORTED IS NOT THE VECTOR SET UP BY YOU, THERE IS A PROBLEM AND 
AUTO SIZING SHOULD NOT BE DONE. 


8.5.3 PARAMETER ASSUMPTIONS. 


SINCE TOO MUCH ‘oe g' WOULD NEED TO BE TURNED ON TO SIZE THE REST OF 
THE PARAMETERS; THE PROGRAM MUST ASSUME THE REMAINING VARIATIONS. THE 
RESULT IF NOT TO YOUR SPECIFIC CONFIGURATION MAY BE ALTERED BY HAND. 
IN THIS WAY 95% OF THE PARAMETER SETUP WAS DONE BY THE PROGRAM AND 5% BY 


YOU. 

peenerone : 

1) ALL FOUR LINES ARE ASSUMED TO_BE TESTED. 
2) DEFAULT BAUD RATE IS SET TO 17 (19.2 KBAUD). 
3) MODE OF OPERATION IS “INTERNAL MODE"*. 


FOR ALL PARAMETER ADJUSTMENTS PLEASE REFER TO SECTION 8.4 FOR GREATER DETAIL. 
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RUNNING THE DZV11 DIAGNOSTIC UNDER APT 
THE APT INTERFACE 


THE DZV_ DIAGNOSTICS HAVE BEEN DESIGNED TO BE COMPATIBLE WITH THE APT 
(AU pitl 5 yg bh SYSTEM. THE DZV LOGIC TEST DIAGNOSTICS (CVDZA 
AND CVDZB) CAN BE RUN AS STANDALONE DIAGNOSTICS OR IN EITHER OF THE APT 
MODES. CV vore HOWEVER IS DESIGNED AS A STANDALONE DIAGNOSTIC ONLY AND 
REQUIRES DIRECT OPERATOR PARTICIPATION. 


SETTING UP THE DIAGNOSTIC USING APT 


THE DIAGNOSTIC USES SEVERAL VARIABLES IN THE REGION SUBTITLED ‘’ APT 
MAILBOX-ETABLE*. THESE VARIABLES ARE: 


SSWREG -(1142) USED AS THE SOFTWARE SWITCH REGISTER WHILE RUNNING 
UNDER APT. 

SVECT1 =(1170) USED TO SPECIFY THE FIRST VECTOR ADDRESS 

SBASE (1174) USED TO INDICATE BOTTOM ADDRESS OF DZV11 UNDER TEST 

SDEVM (1176) A BIT MAP REPRESENTING WHICH DZV11°S WILL BE TESTED 

$CDW1 =-(1200) USED TO INDICATE WHICH LINES TO RUN ON ALL DZV11'S 

$cDW2 -(1202) USED TO INDICATE THE DEFAULT TEST MODE. SET TO 0 FOR 


INTERNAL TESTING. 7 30, FOR EXTERNAL LOOP BACK (H325 
INSTALL OR SE 100000 FOR STAGGERED LOOP BACK 
TEST ING “se INSTALL 


ED). 
SDDWO -(1204) EACH OF $DDW WORDS DESCRIBES THE PARAMETERS 
(LPR) FOR" A PARTICULAR DZV11, GOING UP TO 16 DZV11°S 


RUNNING UNDER APT 


ALL OF THE VARIABLES MENTIONED IN SECTION a . «2 SHOULD BE SET 
UP PRIOR TO RUNNING THE DIAGNOSTIC UNDER APT 


NOTE 
BE SURF SBASE POINTS TO THE FIRST DZV11 BEFORE RUNNING 


BASED ON THESE VALUES, THE DIAGNOSTIC WILL SET UP THE STATUS 
TABLE. THE USER IS THEN FREE TO MONITOR UNDER APT AS NORMAL. 
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10.0 PROGRAM DESCRIPTION 


THIS PROGRAM WAS ASSEMBLED _ THE PDP=11 MAINDEC SYSMAC 
PACKAGE (MAINDEC-11-DZQAC-C3). 


INITIAL ADDRESS OF THE STACK POINTER **1120** 
MISCELLANEOUS DEFINITIONS 


GENERAL PURPOSE REGISTER DEFINITIONS 
PRIORITY LEVEL DEFINITIONS 

“SWITCH REGISTER’* SWITCH DEFINITIONS 
DATA BIT DEFINITIONS (B1T00 TO B1T15) 
BASIC "‘CPU’’ TRAP VECTOR ADDRESSES 


BITS 15-11=CPU TYPE 
11/04=01,11/05=02, hada f i770-66,o86 211/45=05 


DQ=07,0=10 
BIT 10=REAL_T mec LOC 
BIT Q=FLOATING POINT PROCESSOR 
BIT 8=MEMORY MANAGEMENT 


MEM.TYPE BYTE == (HIGH BYTE) 
900 NSEC CORE= 
300 NSEC BIPOLAR=002 
500 NSEC MOS=003 


MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF ‘‘TYPE'* ABO 


THIS TABLE y te Gl VARIOUS COMMON STORAGE LOCATIONS 
USED IN THE PROGRAM 


THIS aS CONTAINS THE INFORMATION - EACH ERROR THAT CAN OCCUR. 
THE INFORMATION IS OBTAINED BY USING THE INDEX IN 

LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN TABLE IS PERTINENT. 
NOTE1: IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (SERR 

NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


3sPOINTS TO THE ERROR MESSAGE 
;POINTS TO THE DATA HEADER 
;:POINTS TO THE DATA 

:TPOINTS TO THE DATA FORMAT 








Se ee ee ae ee ee: 
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pees THE PASS wn ($PASS) 
IF THERES A ote TOR GO TO IT 
IF THERE ISN'T JUMP TO CYCLE 


THIS pre ph | CONTROLS THE LOOPING OF SUBTESTS. IT WILL I 
AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG.(D 
AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

SWi4=1 LOOP ON TEST 

SW11=1 INHIBIT ITERATIONS 


SCOPE 3: SCOPE=I10T 


ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 orres 
THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
NOTE1: $NULL CONTAINS ‘ CHARACTER Ys BE USED AS THE FILLER CHARACTER. 
NOTE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


NCREMENT 
(DISPLAY<7:0>) 


CALL: 
1) eames A_TRAP INSTRUCTION 
TYPE eMESADR 3sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


TYPE 
MESADR 


ROUTINE USED TO SET UP THE DIAGNOSTIC VIA APT. 
IF BIT? IN THE ENVIRONMENT MODE (SENVM) BYTE IS SET 
THE PROGRAM WILL LOAD ITS PARAMETERS FROM THE ETABLE. 


ROUTINE USED TO ‘‘AUTO SIZE** THE DZV11 
CSR _AND VECT 
NOTE: THE CSR MAY BE ANY WHERE om THE FLOATING 
ne te | RANGE Bs eae. 16377 
AND THE VECTOR MAY BE ANY wi PRE IN THE 
FLOATING VECTOR RANGE (300:770) 


eeeeeeeeaeeeeereneereee TEST 1 eeeeeceeeeneneerereneerenenene 
THIS Le PROVES THE BUS REPLY RESPONSE 
DURING A READ OR WRITE TO THE FOLLOWING ADDRESS: 

DZVCSR, DZVRBUF, DZVTCR, DZVMSR 


eeeeeeeerereceneazenene TEST 2 seeereereneeeeceneeeaneeerenes 
THIS TEST PROVES THAT BIT ‘DCLR* 

CAN BE SET AND THAT IT WILL CLEAR 

BY ITSELF 


SEQ 0016 


4 
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aeereeeeeeereeeeeereeee TEST 3 eeeeeereeraceeeerereeeeregeere 
TEST TO VERIFY THAT THE R/W BITS OF THE 
CAN BE SET. THEN VERIFY THAT 


DZVCSR_ REGISTER 

HESE BIT E CLEARED. se FINALLY, VERIFY 
THAT AFTER BEING SET aye THEY CAN BE 

CLEARED BY A ‘DEVICE 

THE BITS TEST ED ARE: MAINT: MSENAB, SILOEN, 


RIE, AND TIE. 


arerarenerareaneeenenee TEST 4 retereterarararaereeerereeeeneee 
THIS TESTS THAT ALL OF THE TCR BITS 

CAN BE: SET, CLEARED, AND CLEARED a4 A DEVICE CLEAR. 

THIS TEST ALSO DETERMINES IF THE DTR BITS CAN 

BE SET, CLEARED, AND CLEARED BY A RESET. 


nn a ee negra mi TEST § eeeeeeeeeeeeeereeeneeeeeeeeees 
THIS TEST VERIFIES THA 
BITS “'RDONE , TRDY BIT. B1T8, 

AR AND THAT TRDY Is 


AND SILOAL"’ AD ONLY 
ZERO UNTIL A LINE IS SELECTED AND MSENAB IS SET. 


Reeeteeereeeeerarenenee TEST 6 eererereraerencenearearerererene 
THIS TEST vel pes THAT: 

ire eat: ENAB,AND MAINT oy THE 

ONLY R/W, BiTs. IN, THE BZVCSR AND THA 

SETTING DCLR"’ IN THE CSR WILL CLEAR THESE BITS. 


eeeereeeereeeeeeeeeeaene TEST 7 eeeeeeeeeeearaenaaeeeeeeeerenee 
THIS TEST PERFORMS RESET ht hes 

TESTING OF READ ONLY REGISTER DZVRBU 

AND TESTING OF WRITE ONLY REGISTER SDZVLPR 


ekertereereaeeereneanee TEST 10 eeeeeeeeeenaeaeareeeeerareeenne 
THIS TEST PERFORMS RESET TESTING AND 
ies tes OF READ ONLY REGISTER DZVMSR 

AND TESTING OF WRITE ONLY REGISTER DZVTOR 


eeeeeerereeeaeeeereneee TEST 11 eeeeereteeaeacenereeeerenteene 


VERIFY THAT SETTING ‘DTR® FOR A LINE WILL 
“RING FOR: 


BRING UP 

THE SAME LINE IF IN EXTERNAL MODE 

THE STAGGERED he IF o STAGGERED MODE . 
LINES GER FOLLOWS: 


ARE STAG AS 
LINEO WITH LINE; DINE? WITH ustedes 
THIS TEST IS IF AN 5,0R H329 


I 
IS CONNECTED ON THE DZV UNDER TEST. 


eeeeerererereneezeceeene TEST 12 seeeerereeeeeeerareeeeereeeeet 
THIS res? oeeed fee THAT TROY IS SET WHEN A LINE 
IS READ ‘a — ED, AND THAT THE LINE SPECI- 
FIED IN "pits 8-9 OF DEVCSR CORRESPOND 
O THE LINE SELECTED IN DZVTCR 


SEQ 0017 


—— 
NDZ 
NDZ 
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REAAAKRARAARAERAKERAREEE ig 13 eeeeeteeecereeererereeeeeeeree 
TEST TO TRANSMIT ONE CHAR A 
rie ONE C "HAR ON ONE, LINE 
TIME. THE CHAR IS 2" A 
ALL SELECTED LINES WILL BE TURNED ON . 


THIS IS THE FIRST TIME AN 

DATA IS CHECKED IN THE REC cel VER. 

USING SWITCH NINE WITH THIS TEST CREATES A TIGHT SCOPE LOOP 
WHICH TRANSMITS A STEADY STREAM OF CHARACTERS. 


keeeeeaeeeeeeareneereans TEST 14 eeeeeceeeaenaeaaeraereeeaeteeaaree 
THIS TEST VERIFIES THAT EACH RECEIVING LINE CAN BE 

DISABLED BY SET ing: RCVON (BIT12 IN THE LPR REGISTER) 

TO ZERO FOR EACH LINE. 

THIS TEST ALSO VERIFIES THAT THE SILO CAN BE 

EMPTIED BY ISSUING A DEVICE MASTER CLEAR. 


eeetereeeeeeeereeeenaene TEST 15 “tn «OO 
THIS TEST PROVES THAT THE Mae hd 3 TRANSMITS 
ee tine ar hk Lm MODE)AND THE os th ie ng tt (FLAG MODE) 


ONE LINE A TIME BASED UPON VAL 
THIS IS THE Teast TIME THAT ALL DATA IS CHECKED 


eeektereneeneerearenner TEST 16 eeeerererareneeneerennrerenenree 
THIS TEST WILL PROVE, THAT: |, 
1) THE TRANSMITTER "BREAK BIT’ WORKS 
) THE RECEIVER CAN FLAG ‘FRAMING ERRORS” 
) THE RECEIVER CAN FLAG ‘PARITY ERRORS'’ 
ONLY ONE LINE AT A TIME WILL BE EXERCISED. 


keeeeateererearaenzenene TEST 17 eeeeerereneanacaraarenerereener 
THIS TEST VERIFIES THAT THE DEVICE DOES NOT INTERRUPT 

WHILE THE PROCESSOR STATUS DOES NOT ALLOW INTERRUPTS 

BUT WILL INTERRUPT IF THE PROCESSOR STATUS 

ALLOWS INTERRUPTS. 


teeweeeeeceeeeereeeees TEST 20 teeeeteceneeceeeeetererrentere 
THIS TEST VERIFIES THAT THE RECEIVER WILL 

INTERRUPT BEFORE THE TRANSMITTER EVEN 

THOUGH THE TRAN WAS ENABLED 

FIRST. SET PS TO HIGH (MASK INTERRUPTS); 

GET RDONE AND ba -' TO SET; 


SET TX IE AND RX IE; 
CLEAR PS AND EXPECT RX TO INTERRUPT FIRST 


SEQ 0018 


ee een nn © ©: ly ea 
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z:GPA  PRGFRT “?CVDZAB/<200>/FOUR LINE ASYNC MUX TESTS, PART 1 OF 2?,CVDZAB 
[:GPA  .HEADER <CNDZA-A>,<1982> 
TITLE CNDZA-A 


*COPYRIGHT (C) 198 
;*DIGITAL EQUiPMENT “{gR. 
: *MAYNARD, MASS. 01754 


oo 


THIS PROGRAM WAS ASSEMBLED -. THE PDP=11 MAINDEC SYSMAC 
;*PACKAGE (MAINDEC=11-DZQAC-C3), JAN 19, 1977. 


000001 étn=1 
zSTARTING PROCEDURE 


:PROGRAM WIL 
SPEND ZAA/<200> FOUR, LINE ASYNC MUX TESTS, PART 1 OF 2° 

PROGRAM “RUNNING'' TO INDICATE THAT TESTING HAS STARTED 
SAT THE ENDe br H PBass PROGRAM WILL TYPE PASS COMPLETE MESSAGE 
SAND THEN RESUME TESTING 


«REM : 
SWITCH REGISTER OPTIONS 


sw15=1 721, HALT ON ERR 

SW14=4 721, LOOP ON CURRENT TEST 

Sw13=20000 [=1, INHIBIT ERROR TY 

$w12=10000 '=1,DELETE TYPEOUT/BELL ON ERROR. 

SW11=4000 :21, INHIBIT ITERATION 

$W10=2000 [=1,ESCAPE TO NEXT TEST ON ERROR 

w09=1000 $21. LOOP WITH CURRENT DATA 

$w08=400 721640 ON RR ps 

$w07=200 isl, DO “AUTO SIZING'’ ON INITAL START UP. 

w06=100 :=1, DESELECT SPECIFIC DEVICES 

mae SNOTE: THIS MUST NOT EXCEED ORIGINAL COUNT 
= 

$w04=20 it. SELECT DELAY PARAMETER 

$w03=10 . SEL ECT SPECIFIC PARAMETERS 

Sw02=4 of LOCK oN TEST SELEC 

SuO1= 351, RESTART PROGRAM AT SELECTED TEST 

' 


=1 21; SELECT TOEVICE ADRESSE VECTOR, ETC. 
;SBTTL BASIC DEFINITIONS roa ; 
stINITIAL ADDRESS OF THE STACK POINTER *** 1120 eee 


001120 STACK= 1120 
EQUIV EMT ERROR 72;BASIC DEFINITION OF ERROR CALL 
-EQUIV I0T,SCOPE :zBASIC DEFINITION OF SCOPE CALL 


pont SCEL{ Axe Ous DEFINITIONS 
11 3; CODE 4 eat he TAB 
tre 1 3;CODE F F 
CR= 1 :; CODE FOR CARRIAGE RETURN 


van hep tap an ten La ee be en en ee en ee ee te an ee te ee Ln en to Ln te ine lalieieleaialiealelateatatelatatalalalatatatealelalealalealatal b) 
TIPIPIP IN INI INDI INIA acd aed ak dk dd dd td ot SS APN NUNN NPN NPY NIN PININUNNongfnory 


er er ee er ee ee et er ee a ee ee ee ee a a ee ee ee ae ae a ee SY YY we YY YY Yew wa 


c 


000200 
177776 


177774 


170000 


er er ee ee ee er ee ee ee ee ee er ee er er ee er ee er Se ee ee ee ee ee ee ee a a a a a a ae a a ea a ae ee a a le a ee ae 
oS 
o 
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BASIC DEFINITIONS 


CRLF= 00 
PSs 199776 


L~4 

L— 77,7) 
eaisgece’ 

v 

" 

_ 


0 
iorsts THE FOLLOWING OD 
170 


H 2 
SEQ 0020 


3;CODE FOR CARRIAGE _ FEED 
:;PROCESSOR STATUS WORD 


Hf 1b LIMIT REGISTER 
23PROGRAM INTER CH REGISTER” REGISTER 


soe 
ARDWARE DISPLAY REGISTE 
i’ START ADDRESS FOR SBC 1721 IS ADDED 


ODT 
ESGENERAL PURPOSE es rchat heat 


RAL REGISTER 
33GE NERAL REGISTER 
:7GENERAL reel Eten 


z3STACK POI 
3 ;PROGRAM COUNTER 


0= 
R1= z1 
R2= %2 
R3= %3 
R4= 24 
R5= 25 oe 
R6= %6 3 
R7= %7 

SP= %6 
PC= %7 
s*PRIORITY LEVEL DEFINITIONS 
PRO= 0 
PRi= 40 
PR2= 100 
PR3= 140 
PR4= 200 
PR5= 40 
PR6= 00 
PR7= 340 
3*""SWITCH REGISTER’ SWITCH DEFINITIONS 
w15 100000 
SWw14= 40000 
SW13= 20000 
SWi2= 10000 
Swii= 4000 
Swi0= 2000 
Swo9= 1000 
SwO8= 400 
BH 

5 = 

et 40 

Sw04= 20 

SwO3= 10 
SWO2= 4 

SwO1= ‘ 
S = 

-EQUIV Sw09, 
eEQUIV SWO08,SW 
Hauly Bebe 
-EQUIV Sos sus 
-EQUIV §$ S04 
EQUIV it Se tr 
EQUIV SW02,SW 


| ee Ce ee 


a nn re 


| I 2 
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CNDZAA.P11.—- 15=DEC=82 14:31 BASIC DEFINITIONS SEQ 0021 
(2) .EQUIV $wO1,SW1 
(3) sEQUIV $W00,SWO 
(2) >*DATA BIT DEFINITIONS (BITOO TO B1T15) 
(2) 100000 BIT15= 100006 
(2) 040000 BIT14= 40000 
(2) 020000 BIT13= 20000 
(2) 010000 BIT12= 10000 
(2) 004000 BIT11= 4000 
(2) 002000 BIT10= 2000 
(2) 001000 BIT09= 1000 
(2) 000400 BITO8= 400 
(2) 000200 BIT07= 200 
(2) 000100 BIT06= 100 
(2) 000040 BITOS= 40 
(2) 000020 BIT04= 20 
(2) 000010 BITO3= 10 
(2) 000004 BITO2= 4 
(2) 000002 BITO1= 2 
(2) 000001 BITOO= 1 
(2) .EQUIV B1T09,B81T9 
(2) -EQUIV 81T08,81T8 
(2) sEQUIV BIT07.BI1T7 
(2) “EQUIV BITO6.BIT 
(2) “EQUIV BITOS.BIT 
(2) “EQUIV BIT04;BITS 
(2) -EQUIV BIT03,B1T3 
(2) “EQUIV BITO2.B1T2 
(2) -EQUIV 81T01.B1T1 
(2) “EQUIV BIT00.B1TO 
(2) s*BASIC ‘CPU’ TRAP VECTOR ADDRESSES 
(2) 000004 RRVEC= 4 ::TIME OUT AND OTHER ERRORS 
(2) 000010 ESVEC= 10 T:RESERVED AMD ILLEGAL INSTRUCTIONS 
(2) 000014 TBITVEC=14 3:''T' BIT 
(2) 000014 TRIVEC= 14 t:TRACE TRAP 
(2) 000014 BPTVEC= 14 + BREAKPOINT TRAP (BPT) 
(2) 000020 IOTVEC= 20 t: INPUT/OUTPUT TRAP (IOT) **SCOPE** 
(2) 000024 PWRVEC= 24 3 ;POWER FAIL 
(2) 000030 EMTVEC= 30 EMULATOR TRAP (EMT) **ERROR** 
(2) 000034 TRAPVEC= ::""TRAP’’ TRAP 
(2) 000060 TKVEC= 60 S:TTY KEY VEC 
(2) 000064 TPVEC= 64 =: TTY PRINTER VECTOR 
(2) pteeee THE FOLLOWING BREAK VECTOR AND LINE CLOCK VECTOR ARE INCLUDED 
(2) 000100 ikvEC= 100 S:LINE CLOCK VECTOR 
(2) 000140 BRKVEC= 140 S:BREAK VECTOR 
(2) 000240 PIRQVEC=240 [PROGRAM INTERRUPT REQUEST VECTOR 
(1) 
(1) ZINSTRUCTION DEFINITIONS 
(1) F 
(1) 5746 PUSH1SP=5746  ;DECREMENT PROCESSOR STACK 1 WORD 
(1) 5726 POP1SP=5726 SINCREMENT PROCESSOR STACK 1 WORD 
(1) 10046 PUSHRO=10046 :SAVE RO ON STACK 
(1) 12600 POPRO=12600 SRESTORE RO FROM STACK 
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024646 
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GENERAL DEFINITIONS AND EQUIVALENCES 


PUSH2SP= re sDECREMENT STACK TWICE 
POP2SP=22626 SINCREMENT STACK TWICE 
MASK=BIT sSET INTERRUPT MASK (INHIBIT FURTHER INTERRUPTS) 
CLEAR=0 sALLOW INTERRUPTS (CLEAR PROCESSOR STATUS) 
sory CONTROL AND STATUS REGISTER DEFINITIONS 
3 (D2V CSR) BIT DEFINITIONS 
MAINT = BITS sMAINTENANCE _ ENABLE 
DCLR=B81T4 DEVICE CLEAR 
MSENAB=81T5 MASTER SCAN ENABLE 
RIE=B1T6 RECEIVER INTERRUPT ENABLE 


RDONE=B1T7 sRECEIVER DON 
SILOEN= BIT12_ ;SILO oo ENABLE 


SILO ALA 
TIE=B1T14 TRANSMITTER INTERRUPT ENABLE 
TROY=B1T15 s TRANSMITTER READY 


sDZVCSR WORD DEFINITIONS 


TLO=0 s TRANSMIT LINE 0 
TL1=B1T8 ZTRANSMIT LINE 1 
Resi 2 TRANSMIT LINE § 
TL3=BIT9!B1T8 TRANSMIT LINE 


cane BIT DEFINITIONS 


panenceyvi2 PARITY ERROR 


DVALID=B1T15 DATA VALID 
sDZVRBUF WORD DEFINITIONS 


RLO=0 sRECEIVER LINE 0 
RL1=B1T8 RECEIVER LINE 1 
a esiy ZRECEIVER LINE 

RL3=BIT9!BITS  ;RECEIVER LINE 


aoa WORD DEFINITIONS 


LPO=0 LINE PARAMETER 
LP1=B1T0 STINE P RAMETER 

Lpe=BiTt LINE PARAMETER 
LP3=BIT1!BITO [LINE PARAMETER 

FIVE=0 FIVE BITS/CHAR 1 STOP BIT 
SIX=B1T3 [SIX BITS/CHAR, 1 STOP BIT 
SEVEN=B1 14 SSEVEN BITS/CHAR,1 STOP BIT 
EIGHT=B1T4!B1T3 :EIGHT BITS/CHAR.1 STOP BIT 


SEQ 0022 
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CNDZAA.P11. 15=DEC 4:31 GENERAL SEF INI TIONS AND EQUIVALENCES SEQ 0023 
(1) 000040 FIVES=B1T5 :FIVE BITS/CHAR,2 STOP BITS 
(1) 000050 SIXS=B1T5!B1T3 iS BITS S/CHAR.E S 5 
(1) 000060 SEVENS=B1T5 'BIT4 3 SEVEN Feo chan. STOP BITS 
(1) 000070 EIGHTS=BITS'‘BIT4!BIT3 EIGHT BITS/CHAR’ STOP BITS 
(1) 000100 PARITY=BIT6 :PARITY ENABLED 
(1) 000200 ODDPAR=BI1T7 tO0DD PARITY ENABLED 
(1) 000000 TOP=0 ZONE STOP BIT ENABLED 
(1) 000040 TWOSTOP=B1TS TWO st iT NABLED 
(1) 000000 EVEPAR=0 SEVEN PARITY ENABLED 
(1) 010000 RCVON=B1T12 ENABLE RECEIVER (RECEIVER ON) 
q) 000000 $50=0 :SPEED 50 BAUD 
(1) 000400 $75=B1T8 :SPEED 75 BAUD 
(1) 001000 $110=B1T9 :SPEED 110 BAUD 
(1) 001400 $134=B119:B1T8 :SPEED 134.5 BAUD 
(1) 002000 50=B1T10 :SPEED 150 BAUD 
(1) 002400 $300=81110!8178 :SPEED 300 BAUD 
(1) 003000 $600=B81T10'BI1T9 [SPEED 6U0 BAUD 
(1) 003400 $1200=81T10!B1T9:8178 :SPEED 1200 BAUD 
(1) 004000 $1800=BIT [SPEED 1800 BAUD 
(1) 004400 82 =B1T11!BIT SPEED BAUD 
(1) 005000 $2400=B1T11! [SPEED 2400 BAUD 
(1) 005400 $3600=B1T11'BIT9!BITS  :SPEE BAUD 
(1) $4800=B1T11'8 :SPEED 4800 BAUD 
(1) 006400 $7200=B1T11iB1T10/B178 : SPEED 7200 BAUD 
(1) 007000 $9600=B1T11'BIT10'BIT9 :SPEED 9600 BAUD 
(1) 007400 87 9200cBITIiIBITIONBITS! bits ZSPEED 19200 BAUD 
(1) :DZVTCR BIT DEFINITIONS 
(1) 000001 TCRO=81T0 sENABLE TRANSMISSION ON LINE 0 
(1) 000002 TCRI=B1T1 TENABLE TRANSMISSION ON LINE 1 
(1) 000004 TCR2=B1T TENABLE TRANSMISSION ON LINE : 
(1) 000010 TCR3=B1T E TRANSMISSION ON LINE 
(1) 000400 DTRO=B118 [DATA TERMINAL READY FOR LINE 0 
(1) 001000 TRI=BIT 3DATA TERMINAL READY FOR LINE 1 
(1) 002000 DTR2=B1T10 TERMINAL READY FOR LINE : 
(1 004000 DTR3=B1T11 [DATA TERMINAL READY FOR LINE 
(1) zDZVMSR BIT DEFINITIONS 
(1) 000001 170 :RING INDICATED ON LINE 0 
(1) 000002 RING1=B1T1 [RING INDICATED ON LINE 1 
(1) 000004 RING2=B1T SRING INDICATED ON LINE : 
(1) 000010 RING3=BIT [RING INDICATED ON LINE 
(1) 000400 co0=8 [CARRIER PRESENT ON LINE 3 
(1) 001000 C01=B1T [CARRIER PRESENT ON LINE 
(1) 002000 C02=B1T10 [CARRIER PRESENT ON LINE @ 
(1) 004000 C03=B1T11 SCARRIER PRESENT ON LINE 
(1) :DZVTDR BIT DEFINITIONS 
(1) . 
(1) 000400 BRKO=B1T8 :BREAK FOR LINE 9 
(1) 001000 BRK1=B1T [BREAK FOR LINE 
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CNDZAA.P11 15=DEC GENERAL DEFINITIONS AND EQUIVALENCES SEQ 0024 


(1) 002000 BRK siti? BREAK FOR LINE § 
1) 004000 BRK3=B1T11 BREAK FOR LINE 
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15=DEC=82 14:36 PAGE 81 


GENERAL 


mM 2 
-6 
DEFINITIONS AND EQUIVALENCES 


; TABLE OF LOOP AROUND FUNCTIONS (H325) 


I & 

Vv a 

REC TRANS 
DATA DATA 
Eepaae eer | 

Vv a 

co RTS 

I SE wen ma sieareeener 

Vv a 
RING DTR 
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/CNDZA*A MACY11 30(1046) 15=DEC-82 14:36 PAGE 81-7 
| CNDZAA.P11 15=DEC=82 14:31 TRAPCATCHER FOR UNEXPECTED INTERRUPTS SEQ 0026 


~~ 
— 
— 


PEt iit iitiiitiiiiiy) 
3 TRAPCATCHER FOR dey INTERRUPTS 
ZTHE STANDARD “TRAP CA yim ss 376 PLACED 
TBETWEEN ADDRESS 0 TO ADDR 
IT LOOKS LIKE “'PC+2 H WALT" ° 


FERRARA EAEAARERAEAAREAE EASES AEE AER AAAAAEREREEAAAREREREEAAEEEEEEREREREEE 


000000 -=0 


! 
| 
| 
| 
| 


STANDARD INTERRUPT VECTORS 


000020 004370 - SCOPE SCOPE LOOP HANDLER 

000022 000200 MASK ;HANDLE - AT PRIORITY 7 

000024 007326 SPWRDN POWER FAIL HANDLER 

000026 000300 300 3 SERVICE heck PRIORITY LEVEL 6;VER:0 


“ERROR HANDL 
000032 000300 300 SSERVICE AT PRIORITY LEVEL 6;VER:0 
000034 006226 . TRPSRV [GENERAL HANDLER DISPATCH SERVICE 

SSERVICE AT PRIORITY LEVEL 6;VER:0 
.SBTTL ACT11 HOOKS 


FERRARA EAEEEEAE EEE EEE TEER AAAAEAEEEEEAAEEAEREEREEEEEEEEEE 


:HooKs REQUIRED BY ACT11 


eo ere 7 sSAVE PC 
000046 G43 SENDAD 31)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP 
000052 009005 “WORD 0 s32)SET Loc. 322 TO ZERO 

000040 *=$SVPC 2 RESTORE P 

000174 2174 
000174 000000 DISPREG:0 SOFTWARE DISPLAY REGISTER FOR SWITCHLESS 115 
000176 000000 SWREG: 0 SSOFTARE SWITCH REGISTER FOR SWITCHLESS 11S 
000200 000137 002116 * JMP START :GO TO START OF PROGRAM 


001000 -=1000 
001000 005200 047103 055104 MTITLE: .ASCIZ <200><12>/CNDZAA/<200>/FOUR LINE ASYNC MUX TESTS, PART 1 OF 2/<200> 


ee et ee a a ee er ee ee a a er et ee ee a ee ee ee ee a a ee ee a a a ee a a a a le ee ee ae ae 
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4 
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SEE SER gReES RASS 


001152 


00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
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8 3 
0(1046) 15;DEC-82 14: 36. PAGE 81-8 
=DEC=82 14:3 ROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 
001120 .=1120 
SRHARAEAAAAAAAAAERAAEEEEAATEEAEERAAAARAERAEEAARARERAAEEARERERERERAERE 
*SBTTL APT MAILBOX-ETABLE 
he. cn tea aRAGT Ga cade ce ene 
EVEN 
$MAIL 3;APT MAILBOX 
000000 SMSGTY: .WORD AMSGTY :MESSAGE TYPE CODE 
000000 SFATAL: .WORD AFATAL ::FATAL ERROR NUMBER 
000000 STESTN: .WORD ATESTIN ::TEST NUMBER 
000000 ASS: .WORD APASS ::PASS COUN 
000000 SDEVCT: .WORD ADEVCT DEVICE COUNT 
000000 IT: . WORD AUNIT ::1/0 UNIT NUMBER 
000000 SMSGAD: .WORD AMSGAD ::MESSAGE ADDRESS 
000000 SMSGLG: .WORD  AMSGLG z3MESSA GE LENGTH 
SETABLE: T ENVIRONMENT TABLE 
000 SENV: .BYTE AENV : AUVIRONMIEN BYTE 
000 ENVM: .BYTE AENV 
ENVIRONMENT MODE BITS 
000000 sive G: .WORD ASWREG ;;APT SITCH REGISTER 
000000 WR: WORD AUSWR USER SWITCHES 
syste: .WORD ACPUOP :: TYPE OPTIONS 
3* bits 15-11 =CPU TYPE 
3* 1/04=01, 11/05=02, 11/20=03, 11/40=04,11/45=05 
3* 1/70: =06;PDQ=07,0=10 
3* BIT 10=REAL TIME CLO 
3* BIT 9Q=FLOATING POINT PROCESSOR 
7 BIT 8=MEMORY MANAGE 
000 -BYTE AMAMS1 ;;HIGH ADDRESS,M.S. BYTE 
000 SMTYP1: .BYTE AMTYP1 ::MEM. TYPE.BLKAT 
jt MEM.TYPE BYTE == onstigH BYTED 
3t 900 NSEC €=001 
it 300 NSEC ST PDL AR=002 
7 500 NSEC MOS=003 
000000 $MADR1: .WORD AMADR1 HIGH ADDRESS BL kal 
vt MEM.LAS T ADDRES uy BYTES, THIS WORD AND LOW OF ‘‘TYPE’’ ABOVE 
000 $MAMS2: .BYTE AMAMS2 ;::HIGH ADDRESS M.S. BYTE 
000 SMTYP2: .BYTE AMTYP2 3 ;MEM.TYPE.BL 
000000 SHADRG: “WORD AMADRO 3 ;MEM.LAST “ADDRESS ,BLK#2 
000 S3: .BYTE AMAMS HIGH ADDRESS,M.S.BYTE 
000 SMTYP3: . AMTYP3 3:MEM. TYPE,BLK 
000000 SMADR3: .WORD AMADR3 i3MER. LAST ADDRESS,BLK&3 
000 SMAMS4: .BYTE AMAMS4 ::HIGH ADDRESS.M.S.BYTE 
000 SMTYP4: .BYTE AMTYP4 ::MEM. TYPE BLKaG 
000000 DR4: . AMA 3:MEM.LAST ADDRESS BL 
000300 SVECT1: .WORD AVECT1 :: INTERRUPT NEC TORY Bus PRIORITY#1 
909000 SVECT2: .WORD AVECT2 ::INTERRUPT VECTOR#2BUS PRIORITY# 
i {BASE ADDRESS OF EQUIPMENT UNDER TEST 
000001 SDEVM: DEVIC 
000017 $CDW1: “WORD ACBUt : }CONTROLLER DESCRIPTION WORDA1 


pars 
RRS 


pp] 
Ss3s 





proue? - WORD pier | ; CONTROLLER eietca unee wORD#2 
DWO: .WORD ADD DEVICE D IPTOR WORD#O 


I 
: WORD E DESC 
$DDW2: .WORD ug 2;DEVICE DESCRIPTOR WORD# 
SDDWS: .WORD  ADDW :;DEVICE DESC D 


SEO 0027 





CNDZA~A merit 3S ae 


CNDZAA.P11 15=DEC 
(4) 001214 017470 
(4) 001216 017470 
(4) 001220 017470 
(4) 001222 017470 
(4) 001224 017470 
(4) 001226 017470 
(4) 001230 017470 
(4) 001232 017470 
(4) 001234 017470 
(4) 001236 017470 
(4) 001240 017470 
(4) 001242 017470 
(4) 

(4) 
001244 


un 14:36 PAGE 81-9 





APT MAILBOX~E TABLE 


$DDW4: .WORD 
$D0wWS: .WORD 
$DDW6: .WORD 
$DDW7: .WORD 
SDDW8: .WORD 
DDW9: .WORD 
$DDW10: .WORD 
$DDW11: .WORD 
$DDW12: .WORD 
$DDW13: .WORD 
$DDW14: .WORD 
$DDW15: .WORD 
SETEND: 


a a ee Ce + ee 


ADOW15 


3; DEVICE pe etetoros WORD#4 
3;DEVICE DESCRIPTOR WORD#S 
3sDEVICE DESCRIPTOR D 

: DEVICE DESCRIPTOR a 
:DEVICE DESCRIPTOR WORD# 
3sDEVICE DE PTOR 
3;DEVICE DESCRIPTOR WORD#10 
3;DEVICE DESCRIPTOR 
3sDEVICE DESCRIPTOR WORD#1 
3;DEVICE DESCRIPT 

3sDEVICE DESCRIPTOR WORD# 


o3 DES OR 14 
:sDEVICE DESCRIPTOR WORD#15 


SEQ 0028 


B 
8 
> 


ee ee ee 
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bb 
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ae MACY11 cmt xno) 15;DEC~82 14:36 PAGE Bict0 

A.P11 15=DEC-82 14: COMMON T SEQ 0029 
) ~SBTTL COMMON TAGS 

) FTAA AAAEAEAAAAAEAHEAAEEEAEEAAAAAERAARAERAERERAEEAEEEEEEREREEES 
) tS THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

) [*USED IN THE PROGRAM. 

> 001244 SCMTAG: zzSTART OF COMMON TAGS 

» 001244 D 0 

) 001246 000 STSTNM: .BYTE 0 :3 CONTAINS THE TEST NUMBER 

> 00124 000 SERFLG: .BYTE 0 23CONTAINS ERROR FL 

) 901259 000000 SICNT: . 0 sCONTAINS SUBTEST ITERATION COUNT 
» 00125 SLPADR: . 0 ::CONTAINS SCOPE LOOP ADDRESS 

» 001254 000000 SLPERR: .WORD 0 s3CONTAINS SCOPE RETURN FOR ERRORS 
» 001256 SERTTL: 0 s:CONTAINS TOTAL ERRORS DETECTED 

) 001260 SITEMB: .BYTE 0 [CONTAINS ITEM CONTROL BYTE 

» 001261 001 SERMAX: .BYTE 1 ::CONTAIN S MAX. ERRORS PER TEST 

» 001262 000000 SERRPC: .WORD 0 23CONTAINS PC OF LAST ERROR INSTRUCTION 
» 001264 SGDADR: . 0 Z: CONTAINS ADDRESS OF ‘GOOD’ DAT 

» 001266 000000 SBDADR: . 0 3 CONTAINS ADDRESS OF "BAD' DATA’ 

» 001270 000000 SGDDAT: .WORD 0 CONTAINS 'GOOD* DATA 

» 001272 000000 SBDDAT: .WORD 0 [:CONTAINS "BAD® Rta 

) 001274 000000 .WORD 0 T:RESERVED=-NOT TO BE USED 

» 001276 000000 .WORD 0 

» 001300 000 SAUTOB: .BYTE 0 ZZAUTOMATIC MODE INDICATOR 

) 001301 000 SINTAG: .BYTE 0 Z: INTERRUPT MODE INDICATOR 

» 001302 000000 .WORD 0 

)» 001304 177570 SWR: .WORD  DSWR ZZADDRESS OF SWITCH REGISTER 

) 001306 17757 DISPLAY: WORD DDISP S:ADDRESS OF DISPLAY REGISTER 

) 1310 17756 $TkS: 177560 ::TTY KBD STATUS 

) 001312 177562 $TKB: 177562 i: TTY KBD BUFFER 

) 001314 177564 $TPS: 177564 S:TTY PRINTER STATUS REG. ADDRESS 
) 001316 177566 STPB: 177566 2 TTY PRINTER BUFFER REG. ADDRESS 
» 001320 000 : .BYTE 0 AINS NULL CHARACTER FOR FILLS 
> 001321 002 SFILLS: .BYTE 2 i: CONTAINS # OF FILLER CHARACTERS REQUIRED 
» 001322 012 SFILLC: .BYTE 12 33 INSERT FILL CHARS. AF INE F 
» 001323 000 STPFLG: .BYTE 0 :""TERMINAL A VAILABLE™ FLAG (BIT<07>=0=VES) 
) 001324 000000 SREGAD: .WORD 0 : CONTAINS THE ADDRESS FROM 

) Z:WHICH ($REGO) WAS OBTAINED 

» 001326 000000 SREGO: .WORD 0 *:CONTAINS (($REGAD) +0) 

» 001330 000000 SREG1: .WORD 0 s:CONTAINS (($REGAD) +2) 

» 001332 000000 $REGE .WORD 0 Z:CONTAINS (($REGAD) +4) 

» 001334 000000 SREG3: .WORD 0 S:CONTAINS (($REGAD) +6) 

» 001336 000000 SREG4: .WORD 0 : CONTAINS (($REGAD) +10) 

) 001340 000000 SREGS: .WORD 0 T:CONTAINS (($REGAD) +12) 

) 001342 000000 STMPO: .WORD 0 T:USER DEFINED 

) 001344 000000 STMP1: WORD 0 T:USER DEFINED 

» 001346 000000 S$TMP2: .WORD 0 T:USER DEFINED 

) 001350 000000 STMP3: WORD 0 T:USER DEFINED 

» 001352 000000 STMP4: WORD 0 :cUSER DEFINED 

» 001354 000000 STIMES: 0 NUMBER act ITERATIONS 

) 001356 077 QUES: ASCII /2/ SOUESTION HA 

) 001357 015 SCRLF: . ASCII <15> : CARRIAGE RETURN 

» 001360 000012 SLF: eASCIZ <12> ZLINE FEED 
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: *NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
7* EM z:POINTS TO THE ERROR MESSAGE 
7* DH +3POINTS TO THE DATA HEADER 
bed DT NTS TO THE DATA 
se DF ::POINTS TO THE DATA FORMAT 
SERRTB 


JS29e C82 14:36 PAGE 81-11 


RROR POINTER TABLE 
SBTTL ERROR POINTER TABLE 


s*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN _ 
7*THE INFORMATION a OBTAINED BY USING THE INDEX NUMBER FOUN 

3 *LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE is PERTINENT. 
;*NOTE1: IF it EMB IS 0 THE ONLY PERTINENT DATA _IS (SER 


PROGRAM CONTROL PARAMETERS 


SEQ 0030 


NEXT: QO sADDRESS OF NEXT TEST TO BE EXECUTED 

LOCK: 0 sADDRESS FOR LOCK ON CURRENT TEST,TIGHT LOOP 
PROGRAM VARIABLES 

LINE: 1 sDEFAULT ALL FOUR LINES RUNNING 

PAR: 17470 PARAMETERS: I7S/CHAR,2 STOP BITS,19200 BAUD,NO PARIT 

MODE : 8 sDEFAULT MAINTENANCE MODE 

SAVLIN: R 

XMTLIN: 0 ; TRANSMISSION LINE NUMBER 

XMTCNT: 0 3COUNT OF WORDS IN A gry yt yt PATTERN 

REGIST: 0 3DEVICE ADDRESS STORAGE LOCATION 

SAVPC: 0 sPROGRAM COUNTER STORAGE 

DZVACTV: .BLKW 1 3eD2V11" S SELECTED ACTIVE. 

SAVACTV:.BLKW 1 2*A BIT MAP OF onat S_IN THE SYSTEM 

RUN 1 3*POINTER ONE PAST RUNNING DEVICE. 


S*OCTAL NUMBER OF DZV11'S IN THE SYSTEM 


SAVNUM: .BYTE 1 3 *WOR KABLE NUMB! 
SAVNO: “BLKB S*OCTAL NO. OF DZV11°S BEING TESTED 
ACTIVE: DZV.MAP ; TABLE POINTER. 





SS te spe a eae -_—— —_—<. 
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)CNDZAA.P11 = 15=DEC=82 14:31 ERROR POINTER TABLE SEQ 0031 
| 2) 
| (2) :PROGRAM CONTROL FLAGS 
(2) 
(2) 001422 000 INIFLG: .BYTE 0 zPROGRAM INITIALIZATION FLAG 
(2) 00142 000 HDRFLG: .BYTE 0 [PROGRAM INITIALIZATION FLAG FOR HEADER MAP 
(2) 001424 000 MNTFLG: .BYTE 0 SMAINTENANCE BIT SET FL 
(2) 001425 000 DONFLG: “BYTE 0 S TRANSMISSION COMPLETION FLAG 
(2) -DATA VARIABLES 
(2) 001426 000000 TD0:  .WORD 0 
(2) 001430 000000 TD1: WORD 0 
(2) 001432 000000 TD2:  . WORD 0 
(2) 001434 000000 TD3:  . WORD 0 
(2) 001436 000000 TRO:  . WORD 0 
(2) 001440 TRI: WORD 0 
(2) 001442 000000 TR2:  . WORD 0 
(2) 001444 TR3: WORD 0 
(2) 001446 STOP: 
(2) ~SBTTL APT PARAMETER BLOCK 
(3) SSRRAAAAAAAEEEAAEREEEEREE EEE EAEEEEEAAEREEAAAEEAEEEEREEEEEREREEEE 
(2) iSeT LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
(3) Sot nee Caen aan 
(2) 001446 .$X=. 23 SAVE CURRENT LOCATION 
(2) 000024 26 7SET POWER FAIL TO POINT TO START OF PROGRAM 
(2) 000024 000200 200 33FOR APT START UP 
(2) 4 -=44  3;POINT TO APT INDIRECT ADDRESS PNTR. 
(2) 000044 001446 SAPTHDR ::POINT TO APT HEADER BLOCK 
(2) 001446 -=.$X ::RESET LOCATION COUNTE 
(3) Siete ADT DARAETER OaeE On ab ieae fen tee aoeadeeat maeananee 
(2) ZSETUP APT PARAMETER BLOCK AS DEFINED IN THE APT=PDP11 DIAGNOSTIC 
(2) S INTERFACE SPEC. 
(2) 001446 SAPTHD: 
(2) 001446 000000 SHIBTS: .WORD 0 z:TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
(2) 001450 001120 SMBADR: .WORD $MAIL 2 ADDRESS OF APT MAILBOX (BITS 0-15) 
(2) 001452 000120 STSTM: .WORD 80. N TIM OF LONGEST TEST 
(2) 001454 000024 SPASTM: .WORD 20. UN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
(2) 001456 000000 SUNITM: .WORD 0. £2400] T10NAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
(2) 001460 000052 “WORD $ETEND-SMAI ENGTH MAILBOX~E TABLE (WORDS) 
1) 3D2V11 STATUS TABLE AND ADDRESS ASSIGNMENTS 
(1) 
(1) 001500 .=1500 
(1) 001500 DZV.MAP: 
(3) 001500 000001 DZCRO: .BLKw 1 SCONTROL STATUS REGISTER FOR DZV11 NUMBER 0 
(3) 001502 000001 D27VCO: <BLKw 1 SRECEIVER AND BASE VECTOR FOR DZV11 NUMBER 0 
(3) 001504 000001 LINEO: .BLKW 1 TALL LINES SELECTED 
(3) 001506 000001 PARO: .BLKW 1 PARAMETERS 
(3) 001510 000001 MANTO: .BLKW 1 SMAINTENANCE MODE FOR THIS DEVICE 
(3) 001512 000001 DZCR1: .BLKw 1 ZCONTROL STATUS REGISTER FOR DZ7V11 NUMBER 1 
(3) 001514 000001 D2VC1: .BLKw 1 TRECEIVER AND BASE VECTOR FOR DZV11 NUMBER 1 
(3) 001516 000001 LINE1: .BLKW 1 TALL LINES SELECTED 
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(CNDZAA.P11—- 15=DEC-82 14:31 APT PARAMETER BLOCK SEQ 0032 
(3) 001520 000001 PARI: .BLKW 1 ; PARAMETERS 
_ $2 001522 00001 MANTI: . 1 MAINTENANCE MODE FOR THIS DEVICE 
——¢3)- 001524 000001 DZCR2: .BLKw 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 2 
| 001526 900001 D2VCe: <BLKW 7 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 2 
|) 001530 000001 LINE2: .BLKW 1 ALL LINES SELECTED 
' (3) 001532 000001 PAR: .BLKW 1 : PARAMETERS 
| 3) 001534 000001 MANT2: .BLKW 1 MAINTENANCE MODE FOR THIS DEVICE 
| 
| & 001536 900001 OZCR3: .BLKw 1 {CONTROL STATUS REGISTER FOR D2V11 NUMBER. 5 
(3) 001540 000001 DZVC3: 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 3 
(3) 001542 000001 LINES: <BLKW 1 ALL LINES SELECTED 
(3) 001544 000001 PAR3:  .BLKW 1 ; PARAMETERS 
(3) 001546 000001 MANT3: <BLKW 1 MAINTENANCE MODE FOR THIS DEVICE 
(3) 001550 000001 DZCR4: .BLKw 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 4 
(3) 01552 000001 DZVC4: <BLKW 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 4 
(3) 001554 000001 LINES: .BLKW 1 ALL LINES SELECTED 
(3) 001556 000001 PARG: -BLKW 1 ; PARAMETERS 
(3) 001560 000001 MANTG: 1 MAINTENANCE MODE FOR THIS DEVICE 
(3) 001562 000001 DZCRS: .BLKW 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 5 
(3) 001564 000001 D2VC5: :BLKw 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 5 
(3) 00 000001 LINES: <BLKW 1 ALL LINES SELECTED 
(3) 001570 000001 PARS: .BLKW 1 [PARAMETERS 
(3) 001572 000001 MANTS: . 1 [MAINTENANCE MODE FOR THIS DEVICE 
(3) 001574 000001 DZCR6: .BLKW 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 6 
(3) 001576 000001 D2VC6: :BLKw 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 6 
(3) 001600 000001 LINE6: <BLKW 1 ALL LINES SELECTED 
(3) 001602 000001 PAR6: 1 ; PARAMETERS 
(3) 001604 900001 MANT6: <BLKW 1 MAINTENANCE MODE FOR THIS DEVICE 
(3) 001606 000091 DZCR7: .BLKw 1 :CONTROL STATUS REGISTER FOR DZV11 NUMBER. 7 
(3) 001610 000001 D2VC7: -:BLKW 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 7 
(3) 001612 002001 LINE?: <BLKw 1 TALL LINES SELECTED 
(3) 001614 090001 PAR?: 1 ; PARAMETERS 
(3) 001616 000001 MANT?: ; 1 MAINTENANCE MODE FOR THIS DEVICE 
(3) 001620 000001 DZCR10: .BLKw 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 10 
(3) 001622 000001 D2VC10: :BLKw 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 10 
(3) 001624 000001 LINE10: .BLKW 1 ALL LINES SELECTED 
(3) 001626 000001 PARI0: .BLKW 1 : PARAMETERS 
(3) 001650 000001 MANT10: -B 1 [MAINTENANCE MODE FOR THIS DEVICE 
(3) 001632 000001 DZCR11: .BLKw 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 11 
(3) 001634 000001 D2VC11: .BLKw 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 11 
(3) 001636 000001 LINE11: .BLKW 1 ALL LINES SELECTED 
(3) 001640 000001 PARI1: .BLKW 1 ; PARAMETERS 
(3) 001642 000001 MANTI1: .BLKW 1 MAINTENANCE MODE FOR THIS DEVICE 
(3) 001644 000001 DZCR12: .BLKw 1 CONTROL STATUS REGISTER FOR DZV11 NUMBER 12 
(3) 001646 000001 D2VCl2: .BLKw 1 RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 12 
(3) 001650 000001 LINE12: .BLKW 1 ALL LINES SELECTED 
(3) 001652 000001 PARI2: .BLKW 1 :PARAMET 
(3) 001654 000001 T12: :BLKw 1 MAINTENANCE MODE FOR THIS DEVICE 
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CNDZA=A MACY11 30(1046) 15;DEC~82 14:36 PAGE 81-14 
CNDZAA.P11 15=DEC-82 14:31 APT PARAMETER BLOCK SEQ 0033 
(3) 
' (3) 001656 000001 DZCR13: .BLKw 1 ZCONTROL STATUS REGISTER FOR DZV11 NUMBER 13 
| 901660 000001 D2VC13: .BLKW i RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 13 
(3) 1662 000001 LINE13: .8LKW 1 TALL LINES SELECTED 
| ¢3) 001664 000001 PAR13: .BLKW 1 *PARAMET 
(3) 001666 000001 .BLKw [MAINTENANCE MODE FOR THIS DEVICE 
(3) 001670 000001 DZCR14: .BLKwW 1 sCONTROL STATUS REGISTER FOR D2V11 NUMBER 14 
(3) 001672 000001 D2VC14: .BLKwW 1 SRECEIVER AND BASE VECTOR FOR DZ2V11 NUMBER 14 
(3) 001674 000001 LINE14: . 1 TALL LINES SELECTED 
(3) 001676 000001 PAR 7 1 s PARAME 
(3) 001700 000001 MAN -BLKw ZMAINTENANCE MODE FOR THIS DEVICE 
(3) 001702 000001 DZCR15: .BLKw 1 ;CONTROL STATUS REGISTER FOR D2V11 NUMBER 15 
(3) 001704 000001 D2VC15: .BLKW 1 SRECEIVER AND BASE VECTOR FOR DZV11 NUMBER 15 
(3) 001706 000001 LINE15: .BLKW 1 TALL LINES SELECTED 
/ (3) 001710 000001 7 1 + PARAME TE 
(3) 001712 000001 MANTIS: . 1 ZMAINTENANCE MODE FOR THIS DEVICE 
(3) 001714 000001 DZCR16: .BLKW 1 ZCONTROL STaTUS REGISTER, FOR DZV11 NUMBER 16 
(3) 001716 000001 DZ2VC16: .BLKw 1 [RECEIVER AND BASE VECTOR FOR DZV11 NUMBER 16 
(3) 001720 000001 LINE16: .BLKW 1 TALL LINES SELECTED 
(3) 001722 000001 PARI6: . 1 :P 
(3) 001724 000001 T16: .BLKW 1 ZMAINTENANCE MODE FOR THIS DEVICE 
(3) 001726 000001 DZCR17: .BLKw 1 : CONTROL STATUS REGISTER, FOR DZV11 NUMBER 17 
(3) 001730 000001 DZVC17: .BLKW 1 SRECEIVER AND BASE VECTOR FOR DZV11 NUMBER 17 
(3) 001732 000001 LINE17: .BLKw 1 TALL LINES SELECTED 
(3) 001734 000001 PARI7: .BLKW 1 [PARAMETERS 
(3) 001736 000001 117: .BLKw [MAINTENANCE MODE FOR THIS DEVICE 
(1) 001740 177777 DZV.END: 177777 
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CNDZAA.P11 15=DEC=82 14:31 APT PARAMETER BLOCK SEQ 0034 
(1) sDEFINITIONS FOR TRAP SUBROUTINE CALLS 
(1) sPOINTERS TO SUBROUTINES CAN F 
$33 3IN THE TABLE IMMEDIATELY FOLLOWING THE DEFINITIONS 
(1) J ARRAAAA een eeeeeeeeee eee ee eeeaedeeeeeeeeeeeeeeeeteeeeeeeeeeneeeeere 
( 1 d Smaanreaseaae SPPWSES SSS SH® VRS SGT S OOS SSS SSS SSeS SOS DEST oOGTen nse ee nm ewes acm 
(1) 001742 ° AB: 
(3) 104400 ADVANCE=TRAP+0 sCALL TO ADVANCE TO NEXT TEST( OR SCOPE THIS ONE) 
(2) 001742 006322 -ADVANC 
(3) 104401 SCOP1=TRAP+1 sCALL TO LOGS TN CURRENT DATA HANDLER 
(2) 001744 004634 ° 
(3) 104402 TYPE=TRAP+2 sCALL TO TELETYPE OUTPUT ROUTINE 
(2) 001746 004660 -TY 
(3) 104403 INSTR=TRAP+3 sCALL TO ASCII STRING INPUT ROUTINE 
(2) 001750 005426 - INSTR 
(3) 104404 INSTER=TRAP+4 CALL TO INPUT ERROR HANDLER 
(2) 001752 005532 - INSTER 
(3) 104405 PARAM=TRAP+5 sCALL TO NUMERICAL DATA INPUT ROUTINE 
(2) 001754 005552 - PARAM 
(3) 104406 SETFLG=TRAP+6 sCALL TO SET FLAG ROUTINE 
(2) 001756 010164 ° L 
(3) 104407 SAVOS=TRAP+7 sCALL TO REGISTER SAVE ROUTINE 
(2) 001760 005752 ° 
(3) 104410 RESOS=TRAP+10 sCALL TO REGISTER RESTORE ROUTINE 
(2) 001762 006012 RES 
(3) 104411 CONVRT=TRAP+11 sCALL TO DATA OUTPUT ROUTINE 
(2) 001764 006044 . CONV 
(3) 10441 CNVRT=TRAP+12 sCALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 
(2) 001766 00605 - CNVRT 
(3) 104413 DEVICE.CLR=TRAP+13 sCALL TO ISSUE A DEVICE CLEAR 
(2) 001770 006250 -DEVICE.CLR 
(3) 104414 DELAY=TRAP+14 CALL TO DELAY FOR FAST CPU'S 
(2) 001772 006302 -DELAY 
(3) 104415 PARMD=TRAP+15 sCONVERT DECIMAL STRING TO OCTAL 
(2) 001774 011170 - PARMD 
(3) 104416 PAWCH=TRAP+16 3SET FLAG ECHO OR CABLE 
(2) 001776 010304 -PAWCH 
(3) 104417 DCLASM=TRAP+17 sCLEAR DEVICE, SET MAINT. BIT IF I MODE 
(2) 002000 006270 ° SM 
(3) 104420 SHIF T=TRAP+20 :CALL TO ROTATE LINE POINTER 
(2) 002002 006334 - SHIF 
(3) 104421 LPRSET=TRAP+21 sCALL TO SET UP LPR DEVICE REGISTER 
(2) 002004 006352 -LP 
(3) 104422 BUF SET=TRAP+22 sCALL TO ZERO BUFFER AREA 
cH 002006 006412 BUF SET 
( 1 ) e S22 2ST FFG CSG eB ene Tea ee ee ane = SSS S22 G2 222222222 F822 Goose onooo 
(1) FTAA AAAAAHAAAEREA AE ATAAA AREER AEAERAAAAAHERERAAEERERERAERREREEREREEREE 
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CNDZA=A MACY11 30(1046) [oabec~Ce 14:36 PAGE 81-16 
CNDZAA.P11 15=DEC-82 14:31 APT PARAMETER BLOCK SEQ 0035 


sDZV11 VECTOR AND REGISTER INDIRECT POINTERS 
; NG AREA 


~~ 
— 
— 


1) ;WORK I 
(1) 002010 160040 DZvCSR: 160040 :R/w 

1) 002012 160041 HDZVCSR:16006i :R/W 

(1) 002014 16004 DZVRBUF:160042_ :READ ONLY 

(1) 002016 16004 HDZVRBUF : 160043 ;READ ONLY 

1) 902029 160048 2VLPR: 160062 WRITE ONLY 

(1) 002022 16004 HDZVLPR:160043 WRITE ONLY 

(1) 002024 160044 DZVTCR: 160044 :R/W 

(1) 002026 160045 HDZVTCR: 160065 :R/W 

(1) 002030 160046 DZVMSR: 160046 READ ONLY 

(1) 002032 160047 HDZVMSR: 160047 TREAD ONLY 

(1) 2034 160046 DZVTDR: 160046 ;WRITE ONLY 

(1) 002036 160067 HDZVTDR: 160067 WRITE ONLY 

33 sDEFAULT DZV VECTORS 

(1) 002040 000 DZVRIV: 300 REC INTR VECTOR 
1) 002042 000302 D2VRIS: 302 —:REC_INTR STATUS 
(1) 002044 000304 DZVTIV: 304 XMIT INTR VECTOR 
(1) 002046 000306 DZVTIS: 306 © :XMIT INTR STATUS 
(1) 
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(1 
(1 
(1 
(1 
(1 
q 
q 
(1 
(1 
(1 
(1 
qa 
(1 
(1 
(1 
(1 
(1 
(1 
(1 
(1 
(1 
(1 
(1 
qa 
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APT PARAMETER BLOCK 


sTIME TABLE FOR RELATIVE TIMING TESTS 


SEQ 0036 


a ac cc - 
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CNDZAA.P11 15=DEC-82 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0037 


~~ 
Ss 
— 


3PROGRAM (SE TE 
LOCK INT 


IL_VECTOR 
SCLEAR PROGRAM CONTROL FLAGS AND COUNTS 
;TYPE TITLE MESSAGE 


002116 «START: 


(1) 
(1) 

(1) 

(1) 

(1) 

(1) 

ah 

(1) 002116 000005 RESET ZCLEAR THE WORLD. START NEW ENVIRONMENT 
(1) 002120 012706 001120 MOV #STACK, sP [SET UP STACK 

(1) 002124 106427 000200 MTPS [LOCK OUT INTERRUPTS 

(1) 002130 012737 007326 000024 MOV *SPURDN,@#24 ‘SET UP POWER FAIL gEcToR 

(1) 002136 012737 006434 000030 MeV WSERROR.EMTVEC :SET UP ERROR VECTOR 

(1) 002144 012737 000300 000032 MOV #300 ERTVEC+2 :VER: 

(1) 002152 005037 001126 CLR SPA SCLEAR PASS COUNT 

(1) 002156 105037 001247 CLRB SERF iG :CLEAR E ERROR FLAG 

(1) 002162 012737 001500 001420 ° MOV aDzV- MAP ACTIVE 3GET POINTER. 

(1) 002170 012737 000001 001412 MOV SPOINT P POINTER TO FIRST DEVICE. 

(1) 002176 005037 001256 CLR searie [CLEAR ERROR COUNT 

(1) 002202 005037 001262 CLR SERRPC CLEAR LAST ERROR POINTER 

(1) 002206 005037 001246 CLR STSTNM :SET UP FOR TEST 1 

(1 002212 012737 002116 001252 MOV #. START, SLPADR iSET We OR POWER FAIL BEFORE 

(1) set UP FOR SMALL 11 switch REGISTER COMPATIBILITY 

(1) 002220 012737 000176 001304 #SWR OF Tw 

(1) 002226 012737 000174 001306 MOV #DISPREG,DISPLAY ;POINT TO SOFTWARE DISPLAY REGISTER 
(1) tTHE FOLLOWING 3. LINES DELETED IN VER:0 

(1) : CALL ALCON : CHECK FOR FALCON (KXT11) =:GPA 
(1) : BEG 10008 : BR IF NOT S:GPA 
(1) 002234 004737 017254 CALL INI : YES INIT FOR FALCON [:GPA 
(1) : BIC ped EMtVEC#2 : LOWER EM Z:GPA 
(1) 002240 1000s: 33 

(1) 002240 105737 001422 TSTB —sINIFLG ;HAVE WE ALREADY BEEN HERE TODAY? 

(1) 002244 001010 BNE 10$ 31F SO, SKIP PRINTING THE TITLE 

(1) 002246 023727 000042 004324 CMP a#42,#SENDAD RUNNING UNDER ACT 

(1) 002254 001402 BEQ 1$ {DON'T PRINT TITLE 

(1) 002256 104402 001000 TYPE  ,MTITLE :PRINT THE DIAGNOSTIC* $ TITLE 

(1) 002262 105337 001422 1$: DECB ~=s-:s NI FLG :SET THE ONCE ONLY FLAG 

(1) 002266 105737 001141 10$:  TSTB  $ENVM :DETERMINE | WHETHER APT SIZING SHOULD BE DONE 
(1) 002272 1 BPL 15$ GO CHECK FOR auT O-SIZING 

(1) 002274 004737 011172 JSR PC, SETAPT Zoruenuls SE, GO DO APT SIZING FROM ETABLE 
(1) 002300 000137 003614 JMP 105$ [GO PRINT DZV STATUS. TABL LE 

(1) 002 005737 000042 15$: TST av42 + CHAINED UNDER XXDP r:GPA 
(1) 002310 001404 BEQ 16$ : BR IF NOT T:GPA 
(1) 002312 004737 011172 CALL SETAPT : YES, ser —uP FROM ETABLE T:GPA 
(1) 002316 000137 003614 JMP 105$ + AND’ PR SIGPA 
(1) 002322 004737 007110 16$: CALL  GETSWR : GET INITIAL SWITCH SETTING.  33GPA 
(1) 002326 032777 000001 176750 BIT #SW00,aSuR SRESELECT 

(1) 002334 901002 BNE 0$ TIF YES, 6b Ser UP THE INFORMATION 

(1) 002336 000137 002640 JMP 5$ SIF NO, SKIP THE INTERROGAT 10N 

(1) 002342 012700 0015 208: MOV #02V.MAP RO :POINT TO THE yBEGINN ING OF THE MAP TABLE 
(1) 002346 105037 00142 CLRB —sHDRFLG [MAKE SURE A MAP GETS PRINTED 

(1) 002352 005020 25$: CLR (RO)+ [CLEAR A TABLE LOCAT 

(1) 002354 020027 001740 CMP RO, #DZV.END SHAVE THE TABLE BOUNDARICS BEEN EXCEEDED? 
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NDZA=A_MACY11 30(1046) 15=DEC-82 14:36 PAGE 81-19 
NDZAA.P11 15=DEC=82 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0038 


002360 001374 BNE 25$ z1F NOT ,CLEAR THE NEXT LOCATION IN THE TABLE 
002362 105337 001422 DECB INIFLG INSURE NO AUTO SIZING IF QUESTIONS ANSWERED! 


sTHE FOLLOWING ARE PARAMETERS USED TO FILL IN THE MAP 
;TABLE AND SEi UP THE DIAGNOSTIC. 


sGET THE _— ADDRESS oe _THE DZV11°S 
002366 GETCSR= POINTER FOR FALCON a oy 22GPA 
1044 TR ROUT INE 


o 


00306 $ sPOIN TO ME E TO BE PRINTED 
002372 ers #3 PARAM :CALL 1 teetTin TO ASCII CONVERT ROUTINE 


00 BYTE 1 3 NUMBE 0 
013737 001500 001174 MOV DZCRO, SBASE COPY BASE ADDRESS TO ETABLE 


3GET THE = VECTOR ae 
002412 GETVEC= ; POINTER FOR FALCON Lag ea 23GPA 
002412 104403 guste scat THE STRING INPUT ROUTINE 


OINTER MAP LOCATION BE FILL 
002426 005 y aL ; 3MASK y } ge A so creas PARAMETER 
013737 001502 001170 nov DZvCO,$VECTI COPY VECTOR TO ETABLE 


inte THE MODE OF OPERATION (E,1,$) 

002436 403 INS CALL THE STRING INPUT ROUTINE 

002440 003353 oes :POIN NTER TO THE MESSAGE TO BE PRINTED 
406 SETFLG CALL THE MAINTENANCE FLAG SETUP ROUTINE 

002444 001510 MANTO 3THIS IS THE FLAG BEING SETUP 


:GET THE NUMBER OF DZ2V11"S RUNNING 
002446 104403 INSTR :CALL THE STRING INPUT R 


S 
= 
Ww 
~ 
Ss 
R 
& 
o 
Ww 
v 
5 
3 
ee 
— 
> 
° 
oO 
~ 
Pd 
mn 
tect 
= 
oO 
a3 
< 
mm 


002454 000001 sLOWEST L ES E 
002456 000020 16. HIGHEST LEGITIMATE VALUE OF watt RESPONSE 
002460 001344 STMP1 POINTER TO MAP LOCATION TO BE FILLED 

002462 000 BYTE 0 MASK OF INVALID BITS FOR THIS PARAMETER 
002463 001 BYTE 1 NUMBER OF PARAMETERS TO STORE 


002464 012737 000017 001504 MOV INEO :SET UP DEFAULT LINES 
002472 012737 017470 001506 MOV Fine 0, PARO [SET UP DEFAULT LPR PARAME 
0 


32777 000010 176576 BIT #SW03,aSWR :00 YOU WANT PARAMETER 
002506 00140 BEO 30$ :I1F NO, SKIP THE PARAMETER CALL 
10 004737 002670 JSR PC. 65$ :GET P 
002514 012737 000001 001410 30$: MOV SAVACTV :INITIALIZE ACTIVE. DEVICE SELECTION PARAMETER 
113737 001344 001414 MOVB stil. DZVNUM Y THE NUMBER OF D 
005337 001344 35$: DEC :STHP MP1 CONTATHE. THE COUNT OF UNINITIALIZED 
001404 BEQ toe : SELECTED DEVICES 


td UU NINN 2 UNNI 2 = PUNUNININUINININ 2 = 2 = PUNUNINUNUINIIIN 2 57 
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CNDZA=A macy 30(1046) 15=DEC-82 14:36 PAGE 81-20 
— AA.P11. —- 15=DEC=82 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0039 
(1) 002536 000261 SEC SET A BIT FLAG 10 INDICATE AN ACTIVE DEVICE 
(1) 002540 006137 001410 ROL SAVACTV [POINT TO THE NEXT DEVICE 
(1) 002544 000771 BR 35$ :GO DO THIS PROCEDURE AGAIN 
(1) 002546 013737 001410 001346 40$: MOV SAVACTV,STMP2 OF TIMES 
(1) 002554 012700 001500 MOV . #DZCRO,RO :SET A POINTER TO THE SPECIEIED INFORMATION 
(1) 002560 012701 001512 MOV ° #DZCR1.R1  . «-:POINT R1 TO THE REST HE MA L 
(1) 002564 012702 001204 MOV #$DDW0.R2 POINT TO ETABLE’ 5 DEVICE DESCRIPTOR WORDS 
(1) 002570 00024 CLC SINiTIALIZE THE “‘C'’ BIT FOR A ROTATION 
(1) 002572 006037 001346 ROR $TMP2 :SKIP RAPPING SETUP FOR DEVICE O- 11's DONE 
(1) 002576 006237 001346 45$: ASR STMP2 SISOLATE A SELECTION FLAG IN THE “‘C’’ BIT 
(1) 002602 103404 BCS 50$ SIS THIS DEVICE SELECTED? IF YES, GO LOAD TABLE 
(1) 002604 012711 177777 MOV #-1, (R1) S TERMINATE THE LIST 
(1) 002610 000137 003556 JMP 100$ :G0 TO THE NEXT BLOCK 
(1) 002614 012011 50$: MOV (RO)+, (R1) TADDRESS 
(1) 002616 062721 000010 ADD #10, (R1)+ :POINT TO THE NEXT DZV11 ADDRESS VALUE 
(1) 002622 012011 MOV (ROS +, (R1) : 
(1) 002624 062721 000010 ADD (R1)+ [POINT TO THE NEXT VECTOR VALUE 
(1) 002630 012021 MOV (ROS+,(R1)¢ SLINES 
(1) 002632 012021 MOV (RO)+, (R1)¢ PARAMETERS 
(1) 002634 012021 MOV (RO) +, (R1)+ [MAINTENANCE MODE 
(1) 002636 000757 BR 4 
(1) 002640 032777 000010 176436 55$:  =BIT #5W03,aSwR zASK PARAMETERS ? 
(1) 002646 001002 BNE 60$ :1F NO, GO DO AUTO SIZING 
(1) 002650 000137 003556 JMP 100$ [GO SET UP FOR AUTO SIZING 
(1) 002654 004737 002670 60$: JSR PC,65$ 760 ASK PARAMETERS 
(1) 002660 105337 001422 DECB  —s INI FLG S INSURE NO AUTO SIZE IF QUESTIONS ANSWERED 
(1) 002664 000137 003614 JMP 105$ :GO TO THE NEXT BLOCK 
(1) :GET THE ACTIVE LINES PARAMETER 
(1) 002670 65$: 
(2) 002670 104403 INSTR :CALL THE STRING INPUT ROUT! I 
(2) 002672 003165 93$ :POIN NTER TO MESSAGE TO BE PRINTED 
(2) 002674 104405 PARAM sCALL THE OCTAL TO ASCII CONVERT ROUTINE 
(2) 002676 000001 1 SLOWEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 002700 000017 17 SHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 002702 001504 LINEO [POINTER TO MAP LOCATION TO BE FILLED 
(2) 002704 360 <BYTE 360 {MASK OF INVALID BITS FOR THIS PARAMETER 
(2) 002705 001 "BYTE 1 [NUMBER OF PARAMETERS TO STOR 
(1) 002706 105037 001423 CLRB  —-HDRFLG [MAKE SURE THE CHANGES ARE PRINTED 
(1) zTHIS SEGMENT CHECKS TO MAKE SURE THE LINE PARAMETER JUST ENTERED 
(1) [1S LEGITIMATE IN STAGGERED MODE OPERATION IF THAT MODE WAS SELECTED 
(1) 002712 005737 001510 TST MANTO z1S STAGGERED THE MODE OF OPERATION? 
(1) 002716 100021 BPL 85$ ‘IF NOT, SKIP THIS SEGMENT 
(1) 002720 013703 001504 MOV LINEO,R3 [GET A SCRATCH COPY OF THE ACTIVE LINES 
(1) 002724 006003 70$: ROR R3 [GET A LINE SELECTION BIT(EVEN NUMBER LINE) 
(1) 002726 103410 BCS 80$ SIF 17 IS SELECTED, CH HECK TO SEE IF Ti NEXT IS TOO 
(1) 002730 001414 BEQ 85$ [IF ALL HAVE BEEN CHECKE CONTINUE P ROCESSING 
(1) 002732 006203 ASR R3 SIF IT IS 0,CHECK T at THE NEXT IS TOO 
(1) 002734 103373 BCC 70$ SIF THIS ONE'S 0 TOO “GD CHECK THE NEXT PAIR 
(1) 002736 104402 001356 75$: TYPE  ,$QUES ‘THIS IS AN INCORR 109, 60 AMETER 
(1) 002742 104402 010110 TYPE MBADLN *LET THE USER KNOW ABOUT IT 
(1) 002746 000750 BR 65$ 'GO GET THE CORRECT PARAMETER 
(1) 002750 001772 80$:  BEQ 75$ IF ANOTHER FLAG one} SET, THERE'S AN ERROR 
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CNDZAA.P11 =: 15=DEC=82 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0040 | 
(1) 002752 006203 ASR R3 ;GET THE NEXT FLAG 
(1) 002754 103370 BCC 75$ 31F IT ISN'T SET, THERE'S AN ERROR 
(1) 002756 900241 CLC ZINITIALIZE THE “C'' BIT FOR TESTING OF THE NEXT PAIR 
(1) 002760 000761 BR 70$ :GO TEST THE NEXT PAIR OF FLAGS 
(1) ZGET THE LINE PARAMETER REGISTER ARGUMENT 
(1) 002762 85$: 
(2) 002762 104403 INSTR 3CALL THE STRING INPUT ROUTINE 
(2) 002764 003240 94$ :POINTER TO MESSAGE INT 
(3) 002766 104405 PARAM 3CALL THE OCTAL TO ASCII CONVERT 
(2) 002770 OWES ITIMATE VALUE OF EXPECTED RESPONSE 
(2) 002772 000017 1 sHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 002774 001506 PARO :POINTER TO MAP LOC TO BE 
(2) 002776 000 -BYTE 0 MASK OF INVALID BITS FOR THIS PARAMETER 
(2) 002777 001 “BYTE 1 3 OF PARAMETERS TO STOR 
(1) 012702 001504 MOV #LINEO,R2 [POINT TO THE LINE SELECTION PARAMETER 
(1) 003004 012703 001506 MOV #PARO,R3 ‘POINT TO THE CHOSEN B ARAME TE 
(1) 003010 011304 MOV (R3) ,R4 zUSE BAUD RATE AS AN INDEX IN DELAY TABLE 
(1) 003012 006304 ASL “ALIGN INDEX ON WORD Y 
(1) 003014 016437 017214 006320 MOV DLYTBL(R4), DLYCNT ;SET THE DELAY COUNT FOR THIS BAUD RATE 
(1) 063022 000313 SWAB ss (R23) :PLACE IN HIGH BYT 
(1) 003024 052713 010070 BIS #10070, (R3) PLACE 7 TRA PARAMETERS INTO LOC 
(1) 003030 011268 0012 90$: MOV (R2) + 1g(R2) [LOAD THE LINES 
(1) 003034 011363 000012 MOV (R3),12(R3) 3LOAD THE PARAMETERS 
(1) 003040 062702 000012 ADD #1g.Re 3POINT TO THE NEXT SET 
(1) 003044 062703 000012 ADD oR : «. OF BOTH PARAMETERS 
(1) 003050 20327 001734 CMP R3,#PARI7 SHAVE THE TABLE BOUNDARIES BEEN EXCEEDED? 
(1) 003054 001365 BNE o$ TIF NOT, 9? LOAD SOME MORE PARAMETERS 
(1) 003056 000207 RTS P * RETURN 0 CALLING BLOCK 
(1) 030600 052123 041440 91$:  .ASCIZ <200>/1ST CSR ADDRESS (160000: 163 70): / 
(1) 003124 030600 052123 053040 92$:  .ASCIZ <200>/1ST VECTOR ADDRESS (300:770): / 
(1) 003165 300 044514 04216 93$:  .ASCIZ <200>/LINE VE BY BIT <IN OCTAL>(001:17): / 
(1) 003240 042200 945105 52501 948: — .ASCIZ <200>/DEFAULT BAUD RATE <IN OCTAL><00 17): 
(1) 003310 021600 047440 020106 95$:  <:ASCIZ <200>/# OF DZV11'S <IN OCTAL> (1:20): / 
(1) 003353 200 040515 047111 96$ <ASCII <200>/MAINTENANCE / 
(1) 003374 020200 042955 052130 “ASCII <200>/ CEXTERNAL (E))/ 
(1) 003430 020200 044533 052116 -ASCII <200>/ CINTERNAL <DZVCSRO3=1>(1)I/ 
(1) 003465 200 055440 05212 wASCIZ <200>/ ESTAGGERED <H32 ($)}: / 
£1) 003524 042600 052116 051105 97$:  [ASCIZ <200>/ENTER DELAY PARAMETER: / 
(4 003556 7 160s 
(1) 003556 122737 000377 001422 CMPB 0 s«#377,, INIFLG 30NLY DO AUTO SIZE ON 1ST START 
(1) 003564 001013 BNE 
(1) 003566 032777 000200 175510 BIT 1T7,aSwR SBIT7=12? 
(1) 003574 001007 BNE BR IF NO tuto SIZE 
(1) 003576 005737 017532 TST KXTFLAG 3 FALCON ? ZiGPA 
(1) 00360 001402 BEQ 1002$ 3 SRib NEXT IF NOT. [GPA 
(1) 903604 137 002342 seone JMP 208 : YES, DON'T AUTO=SIZE. GPA 
(1) 003610 004737 011320 JSR PC AUTO. SIZE :60 DO THE AUTO SIZE 
(1) 003614 105737 0014 105$: TSTB  HDRFLG HAS THE TABLE BEEN TYPED YET? 
(1) 003620 9010 BNE 120$ F SO, DON'T TYPE IT AGAIN 
(1) 003622 105337 001423 DECB = HDRFLG iTnok re THAT THE TABLE WILL BE TYPED 
(1) 104402 1o062 TYPE XHE AD YPE MAP HEADER 
(1) 003632 012700 0015 MOV #D2V.MAP,RO ‘Str POINTER 
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AMACYTT 301046) 1S-DEC~B2 14:36. PAGE 81-22 
ul 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0041 


177777 177777 HIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
006320 DLYCNT POINTER TO MAP LOCATION TO BE FILLED 

000 BYTE 0 sMASK OF INVALID BITS FOR THIS PARAMETER 

BYTE R_ OF PARAMETERS TO STORE 
700 000300 140$: MOV #300 


POR et et ot ot 
FSOneolNvS 

f=] 

i=) 

— 

ee 

<< 

— 


012 RO [PREPARE TO CLEAR THE FLOATING 
012701 000302 MOV #302,R1 [VECTOR AREA. 300-776 

010120 145$: MOV R1, (RO)+ ‘START PUTTING 'PC+2 = HALT" 
005021 CLR i) tIN VECTOR AREA, 


SQOQoooooooeoo 


SENS 
~ 
3 


(R1)+ 
MP (RO)+,(R1)+ 3POP POINTERS 

005737 017532 TST KXTFLAG ; IF FALCON... 33GPA 

001403 BEQ 1001$ 33GPA 

020027 000400 CMP RO, #400 3..-STOP AT 400. 73GPA 

000402 402 : SKIP NEXT 33GPA 
1001$: 33GPA 

022700 001000 CMP #1000,R0 ALL DONE?? 

001364 145$ : 


RR 


AMmoIMmos&N 


SSeReeEeessessesseseesse 


oooo 


TEST START AND RESTART 


7A- 
ZAA 

(1) 3636 010037 001344 110$: MOV RO,STMP1 :POINT TO THE MAP LOCATION 

(1) 012087 1346 MOV (RO)+, $TMP2 tSET DATA 

(1) 003646 022737 177777 001346 CMP #1, $TMP2 SEND OF LIST? 

(1) 003654 001403 BEQ ~=—ss«*1208 6R IF _YES 

(1) 003656 104411 115$:  CONVRi SCALL THE OCTAL TO ASCII CONVERSION ROUTINE 
a1) Soscee 010152 XSTATOQ ‘CONVERT THE DATA AT THIS ADDRESS 

(1) 00 0007 BR 110 [GO PRINT THE NEXT PARAMETER 

(1) 00 013737 001410 001406 1208: MOV SAVACTV,DZVACTV :COPY BIT MAP OF SYSTEM DEVICES ACTIVE 

(1) 003672 113737 001414 001416 MOVB DZVNUM,SAVNO  :COPY NO. OF SYSTEM DEVICES ACTIVE 

(1) 003700 032777 000100 175376 BIT #3406 ,GSuR SDESELECT SPECIFIC DEVICES?? 

(1) 003706 001431 BEQ 135$ :BR IF NO. 

(1) 003710 121$: 

(2) 003710 104403 INSTR :CALL THE STRING INPUT ROUTINE 

(2) 003712 010000 MNEW ‘POINTER TO MESSAGE TO BE PRINTED 

(2) 003714 104405 PARAM [CALL THE OCTAL TO ASCII CONVERT ROUTINE 
(2) 003716 000007 1 SLOWEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 003720 177777 177777 _ SHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 003722 001406 DZVACTV :POINTER TO MAP LOCATION TO BE 

(2) 003724 000 .BYTE 0 [MASK OF INVALID BITS FOR THIS PARAMETER 
(2) 003725 001 "BYTE 1 : R OF PARAMETERS TO STOR 

(1) 003726 023737 001406 001410 CMP DZVACTV,SAVACTV :IS THE VALUE VALID? 

(1) 003734 101403 BLOS  122$ SBRANCH IF YES 

(1) 003736 104402 007652 TYPE MERR3 [IF NOT THEN TYPE ERROR 

(1) 003742 000762 BR f{21$ £60 REASK QUESTION 

(1) 003744 105037 001416 122$. CLRB  SAVNO [CLEAR NO. OF DEVICES BEING TESTED 

(1) 003750 013737 001406 001344 MOV DZVACTV,$TMP1 :COPY BIT MAP OF ACTIVE DEVICES BEING TESTED 
(1) 003756 006237 001344 126$: ASR $TMP1 :SHIFT OUT AN ACTIVE BIT 

(1) 003762 103002 BCC 127$ SIF NOT ACTIVE SKIP INCREMENT 

(1) 003 105237 001416 INCB  SAVNO TIF ACTIVE RECORD I 

(1) 003770 0013 127$: BNE 126$ TIF ALL ACTIVE BITS RECORDED DON'T BRANCH 
(1) 003772 032777 000020 175304 135$: BIT #SW04 ,aSWR SCHECK TO SEE IF DELAY COUNT CHANGES 

(1) 000 001407 BEQ 1408 : . AR VECTOR AR 

(2) 004002 104403 INSTR [CALL THE STRING T 

(2) 004 003524 97$ [POINTER TO MESSAGE TO BE PRINTED 

(2) 004006 104405 PARAM [CALL THE OCTAL TO ASCII CONVERT ROUTINE 
(2) 1 1 SLOWEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(2) 

(2) 

(2) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 

(1) 
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/CNDZA=A MACY11 3011046) 1 15=DEC=82 14:36 PAGE 81-23 
CNDZAA.P11—- 15=DEC=82 14:31 PROGRAM INITIALIZATION AND START UP. SEQ 0042 
| (1) 004060 012706 001120 BEGIN: MOV #STACK,SP :SET UP STACK 
(1) 006064 106427 000200 MTPS #MASK :LOCK OUT INTERRUPTS 
| 1) 004070 005737 000042 TST ana2 [1S PROGRAM UNDER MONITOR CONTROL 
| (1) 004074 001015 BNE 2$ BR IF YES 
| (1) 006076 032777 000004 175200 BIT #B1T2,aSuR [CHECK FOR LOCK ON TEST 
| (1) 004104 001406 BEQ 1$ 'BR IF NO LOCK DESIRED. 
(1) 004106 104402 007676 TYPE ,MLOCK :TYPE LOCK SELECTED. 
(1) 004112 012737 000240 004402 MOV #NOP, TTST ZADJUST SCOPE ROUTINE. 
(1) 004120 000403 BR 2$ TINUE ALONG. 
(1) 004122 013737 004630 004402 1$: MOV BRW,TTST 3PREPARE_NORMAL SCOPE ROUTINE 
(1) 0041 012737 010464 001252 2$: MOV MCYCLE,S$LPADR START AT 'CYCLE’’ FIND WHICH DEVICE TO TEST 
(1) 006136 113737 001416 00141 MOVB  SAVNO, SAVNUM {COPY ACTIVE DEVICES BEING TESTED 
(1) 004144 104402 007567 TYPE ZR iTYP “RUNNING 
(1) 004150 000177 175076 JMP aSLP TART TESTING 
8704 s:GPA  PRGEND oryite OR END PASS iNDZACA >,10. 


—D——— 
| E 4 
[CNDZACA MACYT1 301066) 15-DEC“B2 14:36 PAGE. 81-24 


013700 000042 $GET42 a#42,R0 33GET MONITOR ADDRESS 
001405 Q SDOAGN 2 BRANCH IF NO MONITOR 


SENDAD: JSR PC, (RO) 33 


000240 s3ACT11 
SDOAGN 

000137 J a(PC)+ 7 ;RETURN 
010464 SRTNAD: .WORD CYCLE 


So 


000001 XCSR: 1 
002 -BYTE 6 
002010 DZVCSR 


Ree SESSEREEEEE EERE 


AAR AAR AA RAR RRR RAR 
SER 
£NweoO 
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| CNDZAA.P11 “DEC=82 14:31 END OF PASS ROUTINE SEQ 0043 
8705 sEND OF PASS 
| 42) : TYPE NAME OF 
| 2) SUPDATE PASS COUNT 
| (2) SCHECK FOR EXIT TO ACT=11 
(9) “RESTART TEST 
| (3) .SBTTL END OF PASS ROUTINE 
(4) FERRARA AAAAEAEAAAAAEREAAAEREEAEEAAAAEAAAEHERERERERREHERAEREEEEEEE 
(3) T*INCREMENT THE PASS NUMBER ($PASS) 
(3) :*IF THERES A MONITOR GO TO IT 
(3) :*]F THERE ISN'T JUMP TO CYCLE 
(3) 004154 SEOP: 
(5) 004154 000004 SCOPE 
(5) 004156 005037 001262 CLR SERRPC ZCLEAR LAST ERROR PC 
(5) 004162 105037 001247 CLRB = SERFLG [CLEAR ERROR FLAG 
(5) 004166 104402 007543 TYPE § ,MEPASS STYPE END PASS 
(5) 004172 104402 007725 TYPE ,MCSRX STYPE CSR 
(5) 004176 104412 004340 CNVRT <XCSR ; IT 
(5) 004202 104402 007733 TYPE  MVECX :TYPE VECTOR 
(5) 004206 104412 004346 CNVRT  —>XVEC : T 
(5) 004212 005237 001126 INC $PASS sRAISE PASS COUNT 
(5) 004216 104402 007741 TYPE §,MPASSX STYPE PASSES 
(5) 004222 104412 004354 CNVRT  ‘XPASS : 
(5) 004226 005337 001126 DEC $PASS SRESTORE PASS COUNT 
(5) 004232 104402 007752 TYPE  ,MERRX : TYPE ERRORS 
(5) 004236 104412 004362 CNVRT *XERR : IT 
(5) 004242 009237 9011 30 INC $DEVCT SINC DEVCNT FOR APT 
(5) 46 105337 00141 DECB SAVNUM SARE ALL DEVICES TESTED? 
(5) 004252 001030 BNE SDOAGN [BR IF NO. 
(5) 004254 113737 001416 001415 MOVB  SAVNO,SAVNUM  §$;RESTORE THE COUNT 
(3) 004262 005037 001354 CLR STIMES 3;ZERO THE NUMBER OF ITERATIONS 
(3) 004266 005237 001126 INC SPASS T: INCREMENT THE PASS NUMBER 
(3) 004272 042737 100000 001126 BIC #100000,$PASS ;;DON'T ALLOW A NEG. 
(3) 004300 005327 DEC (PC)+ 3: LOOP? 
(3) 302 000001 SEOPCT: .WORD 1 
(3) 304 003013 BGT SDOAGN rr YES 
(3) 012737 MOV (PC)+,a(PC)* RESTORE COUNTER 
(3) 900001 SENDCT: .WORD 1 
) : MOV 
) BE 
) 000005 :: 
) : JS ::G0 TO MONITOR 
) >: SAVE ROOM 
) : FOR 
NOP 
) MP 
) : 
) 
) 
) 
) 
006 +2 


oOo -- + ee ee —-— —-+- + a 
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‘CNDZAA.P11.—s- 15=DEC= END OF PASS ROUTINE SEQ 0044 
| (2) 904346 000001 KVEC: 1 
(2) 004350 003 002 .BYTE 3,2 
| (3) 004 352 002040 DZVRIV 
/ (2) 004354 000001 XPASS: 1 
(3) 004356 0 002 .BYTE 6,2 
| = (2) 006360 ©001126 SPASS 
| = (2) 004362 +000001 KERR: 1 
| 3) 004364 006 002 .BYTE 6,2 
| (3) 004366 001256 SERTTL 
| (2) zSCOPE LOOP AND ITERATION HANDLER 
(2) 
(3) .SBTTL SCOPE HANDLER ROUTINESTARS 
(3) 3*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
(3) [*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
(3) ;*AND LOAD THE ERROR FLAG (SERFLG) INTO tied in 
(3) ;* THE Soren OPTIONS PROVIDED BY THIS ROUTINE Ai 
(3) *SW14=1 LOOP ON TEST 
(3) teSwi1=1 INHIBIT ITERATIONS 
(3) 3 *CALL 
ti 3* SCOPE 3: SCOPE=I0T 
(3) 004370 SSCOPE: 
(S$) 004370 005037 001262 ~SCOPE: CLR SERRPC sCLEAR LAST ERROR P 
(5) 004374 02271 012026 CMP #TST1¢2, (SP) et THIS THE SCOPE ti THE BEGINNING OF TST1? 
(5) 004400 00141 BEQ S$XTSTR 0, DON'T LOOP ON IT 
(5) 004402 06 TTST: BR 1$ :G0T0 i$ (IF LOCK SWO2=1; THIS LOC =240) 
(5) 004404 0S 174700 TSTB = @STKS *KEYBOAR 
(5) 004410 100067 BPL SOVER :BR IF NO. CLOCK: HIT KEY TO GOTO NEXT TEST) 
(5) 004412 017766 174674 177776 MOV @S$TKB,-2(SP)  :CLEAR I 
(3) 004420 032777 040000 174656 1$: BIT #B1T14,aSwR :LOOP ON PRESENT TEST? 
(3) 004426 001060 BNE SOVER “VES IF SW14=1 
(3) gAAAANSTART OF CODE FOR THE XOR teSTERMeane se 
(3) 004430 000416 $xT 6$ z21F RUNNING ON THE OR", TESTER CHANGE 
(3) [THIS INSTRUCTION TO A “NOP’' (NOP=240) 
(3) 004432 013746 000004 MOV a#ERRVEC, gu csP) tISAVE THE CONTENTS OF THE ERRON VECTOR 
(3) 004436 012737 004456 000004 MOV #5$,a¥ERRVEC = 33SET FOR TIMEOUT 
(3) 004444 005737 177060 TST a#177060 :TIME OUT ON XOR? 
(3) 004450 012637 000004 MOV (SP) +, a#ERRVEC 3 RESTORE THE ERROR VECTOR 
(3) 004454 000436 . BR SSVLAD [GO TO THE NEXT T 
(3) 004456 022626 5$: CMP (SP) +, (SP)+ $3 CLEAR THE STACK AFTER A TIME OUT 
(3) 004 012637 000004 MOV (SP)+,@#ERRVEC ::RESTORE THE ERROR VECTOR 
(3) 004464 000441 BR *LOOP ON THE PRESENT TEST 
(3) 004466 6$:;M##ANEND OF CODE FOR THE XOR’ festensees 
(3) 004466 105737 001247 2$: TSTB = SERFLG 33HAS AN ERROR OCCURRED? 
(3) 004472 001404 BEQ $ F NO 
(3) 004474 105037 001247 4$: CLRB = SERFLG $ZERO. THE ERROR FLAG 
(3) 004500 005037 001354 CLR STIMES ZCLEAR THE NUMBER OF ITERATIONS TO MAKE 
(3) 004504 032777 004000 174572 3$: BIT #BIT11,aSuR 33 INHIBIT ITERATIONS? 
(3) 004512 001011 BNE 1$ YES 
(3) 004514 005737 001126 TST SPASS 331F FIRST PASS OF PROGRAM 
(3) 004520 001406 BEQ 1$ INHIBIT ITERATIONS 
(3) 004522 00523 001250 INC SICNT iF INCREMENT ITERATION C COUNT 
(3) 004526 23737 001354 001250 CMP STIMES,SICNT | ::CHECK THE NUMBER OF ITERATIONS MADE 
(3) 004534 002015 BGE SOVER 7:BR IF MORE ITERATION REQUIRED 
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\CNDZAA.P11 “DEC=82 14:31 SCOPE HANDLER ROUTINESTARS SEQ 0045 
} 
| @ ae 012737 900001 901250 18: MOV #1 SICNT ::REINITIALIZE THE ITERATION COUNTER 
| GB 004944 013737 O04g52 007354 MOV  $MXCNT,STIMES 3:SET NUMBER OF ITERATIONS TO DO 
(3) 004552 1052357 on isco SSVLAD: INCB STSTNM 3; COUNT TEST N 
| GP 906996. 115737 ore4g 01124 MOVE  S$TSTNM.STESTN ::SET TEST NUMBER IN APT MAILBOX 
(3) 004564 011637 00125 MOV (SP) ,SLPADR 33SAVE SCOPE LOOP ADDRESS 
| (3) 004570 013777 001246 174510 SOVER: MOV — STSTNM.@DISPLAY ::DISPLAY TEST NUMBER 
(3) 004576 013716 00125 MOV SLPADR, (SP) 3;FUDGE RETURN ES 
(5) 004602 004737 007062 JSR PC, SERV. 3FIND OUT IF *G WAS TYPED 
(3) 004606 105037 001424 CLRB = MNTFLG SCLEAR THE MAINTENANCE BIT SETTER AFTER EACH TEST 
| ¢5) 004612 005737 001372 TST MODE SHAS THE MODE BEEN CHANGED? 
(5) 004616 001003 BNE 4$ IF NOT INTERNAL, GO DO A TEST 
(5) 004620 112737 000010 001424 MOVE  #MAINT,MNTFLG IF INTERNAL MODE NOW, SET THE MAINTENANCE BIT 
(5) 004626 000002 4$: RTI :G0 DO THE TEST 
(5) 006630 000406 BRW: 406 
(3) 006632 000005 SMXCNT: 5 MAX. NUMBER OF ITERATIONS 
) sCHECK FOR FREEZE ON CURRENT DATA 
(1) , 
(1) 006634 032777 001000 174442 .SCOPI: BIT #Sw09,asuR 18 sw09=1 (SET)? 
(1) 004642 001405 Beas :BR IF NOT SET. 
(1) 004644 005737 001364 TST LOCK 71S THERE A TIGHT LOOP SPECIFIED? 
(1) 004650 001402 Beas Z1F NO, RET 
(1) 004652 013716 001364 MOV LOCK, (SP) IF YES. *GOTO THE ADDRESS IN LOCK. 
(1) 004656 000002 1$: RTI 360 BACK. 
(1) 004660 032777 010000 174416 .TYPE: BIT #SW12,aSWR Sys ALL_PRINTOUT?? 
(1) 004666 001403 BEQ = STYPE Z1F NO YPE 
(1) 0046 062716 000002 ADD #2, (SP) Bot OvER MESSAGE POINTER 
(1) 004674 000002 RTI SRETURN TO WHERE PROCEDURE WAS INVOKED 
44 -SBTTL TYPE ROUTINE 
(3) FRERAAAAAAAAAEEAAAAE EEE EAA EEE EAE AAERAEEEERERERAAREEAEEEREEEEEEE 
(2)  SROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 ah F 
(2) *THe ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
(2) 3 *NOT El: SNULL CONTAINS THE CHARACTER BE USED AS THE FILLER CHARACTER. 
(2) ; *NOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
ts) *NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
7* 
(2) *CAL 
(2) :#1) “USING A TRAP INSTRUCTION 
os; ‘SOR TYPE oMESADR sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
(2) 7* TYPE 
(2) 7* MESADR 
3 , 
(2) 004676 105737 001323 STYPE: ISTB  $TPFLG 318 THERE A TERMINAL? 
(2) 004702 100002 BPL_StédTS :BR IF Y 
(2) 004704 000000 HALT SEWALT HERE IF NO TERMINAL 
(2) 004706 000430 BRS 3 LEA 
(2) 004710 010046 1$: MOV —RO, = (SP) SAVE RO 
(2) 006712 017600 900002 MOV — @2¢ SP) RO SIGET ADDRESS OF ASCIZ STRING 
2) 006716 120737 000001 001140 CHB HAPTENY.SENV —ERUNNING IN APT MODE: 
(3) 004786. 132737 000100 001141 BITB | #APTSPOOL.SENVM ::SPOOL MESSAGE TO APT 
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CNDZA=A MACY 30(1046) 15=DEC=82 14:36 PAGE 81-27 
| 
ICNDZAA.P11 =: 15=DEC=82 14:31 TYPE ROUTINE SEQ 0046 
| (2) 004734 001405 BEQ 62$ zNO,GO CHECK FOR CONSOLE 
| (2) 004736 «010037 004746 MOV RO,61$ T:SETUP MESSAGE ADDRESS FOR APT 
(2) 004742 004737 005166 JSR PC. SATY3 7:SPOOL MESSAGE TO APT 
(2) 00474 999000 61$:  . MESSAGE 
(2) 006750 132737 000040 001141 62$: BITB $#APTCSUP,SENVM ::APT CONSOLE SUPPRESSED 
(2) 0047 001003 E $ zz VES,SKIP TYPE OuT 
(2) 004760 11204 2s: MOVB (RO) +, =(SP) 3:PUSH CHARACTER TO BE TYPED ONTO STACK 
(2) 004762 00100 BNE 4$ ::BR If IT ISN'T THE TERMINATOR 
(2) 004764 005726 TST (SP) Z:1F TERMINATOR POP IT OFF THE STACK 
(2) 004766 012600 608: MOV (SP) RO T:RESTORE R 
(2) 004770 062716 000002 $: ADD (SP) 3ZADJUST RETURN PC 
(2) 004774 000002 RTI TURN 
(2) (96776 122716 000011 4$: CMPB es MHI, (SP) ::BRANCH IF <HT> 
(2) 05002 001430 BEQ $ 
(2) 005004 122716 000200 CMPB Ss CRLF, (SP) ::BRANCH IF NOT <CRLF> 
(2) 005010 001006 BNE 
(2) 005012 005726 TST (SP)+ z;POP <CR><LF> EQUIV 
(2) 005014 104402 TYPE Z: TYPE A CR AND L 
(2) 005016 001357 SCRLF 
(2) 005020 105037 005154 CLRB  $CHARCNT CLEAR CHARACTER COUNT 
(2) 005024 000755 BR 2$ [GET NEXT CHARACTER 
(2) 005026 004737 005110 5$: JSR PC, STYPEC 3:60 TYPE THIS CHARACTER 
(2) 005032 123726 001322 6$: CMPB ss SFILLC,(SP)*  ::I1S IT TIME FOR FILLER CHARS.? 
(2) 005036 001350 BNE $ z:1F NO GO GET NEXT CHAR. 
(2) 005040 013746 001320 MOV SNULL ,-(SP) 7:GET # OF FILLER CHARS. NEEDED 
(2) 7zAND THE NULL C 
(2) 005044 105366 00CC01 7$ DECB —s«1( SP) 7:DOES A NULL NEED TO BE TYPED? 
ts} 00505 poeeee BLT 3:BR IF NO-- POP THE NULL OFF OF STACK 
(2) 005052 004737 005110 JSR PC ,STYPEC ::G0 TYPE A NULL 
(2) 005056 105337 005154 DECB $CHARCNT ::D0 NOT COUNT AS A COUNT 
(2) 005 000770 BR 7$ 33 
(2) ZHORIZONTAL TAB PROCESSOR 
(2) 005064 112716 000040 8$: MOVB ss #"_ (SP) ; :REPLACE TAB WITH SPACE 
(2) 005070 004737 005110 9$: JSR Pc ,$TYPEC 3TYPE A SPACE 
(2) 005074 132737 000007 005154 BITB 4#7.$CHARCNT [BRANCH IF NOT AT 
(2) 005102 001372 BNE 9$ $:TAB STOP 
(2) 005104 005726 TST (SP)+ 2 3POP ae OFF STACK 
(2) 005106 000724 BR 2$ 3GET NEXT CHARACTER 
(2) 005110 105777 174200 STYPEC: TST8 aSTPS [:WAIT UNTIL PRINTER IS READY 
(2) 005114 100375 BPL STYPEC 
(2) 005116 116677 000002 174172 MOVB 2(SP),a$TPB z:LOAD CHAR TO BE TYPED INTO DATA REG. 
(2) 005124 122766 000015 000002 CMPB 4#CR,2(SP) z31S CHARACTER A CARRIAGE RETURN? 
(2) 005132 001003 BNE 1$ 
(2) 005134 105037 005154 CLRB = $CHARCNT $EYES@=CLEAR CHARACTER COUNT 
(2) 005140 000406 BR STYPEX SEXIT 
(2) 005142 122766 000012 000002 1S: CMPB es ML, (SP) 7:1S CHARACTER A LINE FEED? 
(2) 005150 00140 BEQ STYPEX 37BRANCH IF YES 
(2) 005152 10522 INCB CPL) e [COUNT THE CHARACTER 
(2) 005154 000000 SCHARCNT:.WORD 0 + CHARACTER COUNT STORAGE 
(2) 005156 000207 STYPEX: RTS PC 
(2) 


(2) 
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APT COMMUNICATIONS ROUTINE 
~SBTTL APT COMMUNICATIONS ROUTINE 


a ee a ae ee ee ee 


bATvi: MO #1,SFFLG 
SATY3: MOVB #1,$MFLG 
BR sate 
SATY4: MOVB #1 SHFLG 
SATYC: 
MOV RO,-(SP) 
MOV R1,-(SP) 
TSTB S$MFLG 
BEQ 5 
CHP #APTENV, SENV 
B18 #APTSPOOL . SENVM 
MOV a4(SP),RO 
ADD #2,4(SP) 
1$: TST SMSGTYPE 
BNE 1$ 
MOV RO, SMSGAD 
>:PUT ADDR IN MAILBOX 
2s: TSTB 30s (RO) 
BNE $ 
SUB SMSGAD,RO 
ASR R 
MOV RO, SMSGLGT 
MOV #4. SMSGTYPE 
3$: MOV a4(SP),4$ 
ADD #2,4(SP) 
MOV 177776, =(SP) 
JSR ,STYPE 
4$: a D 
5$: 
10$: STB  $FFLG 
BEQ 12$ 
TST SENV 
BEO 12$ 
11$ TST SMSGTYPE 
BNE 
MOV a4 (SP) ,SFATAL 
ADD #2,4(SP) 
INC SMSGTYPE 
12$:  CLRB  $FFLG 
CLRB ss SLFLG 
CLRB FLG 
V (SP)+,R1 
V (SP)+-RO 
TS PC 
SMFLG: .BYTE 0 
$LFLG: .BYTE 0 
*:LOG FLAG 
SFFLG: .BYTE 6 


EVEN 
APTSIZE=200 


TO REPORT FATAL ERROR 
3:70 TYPE A MESSAGE 


TO ONLY REPORT FATAL ERROR 
33PUSH RO ON STACK 

33PUSH R1_ON STACK 

+3 SHOULD _TYPE A MESSAGE? 

: OPERATING UNDER APT? 

33 SHOULD “ty MESSAGES? 


33GET MESSAGE ae 
RETURN ADDR. 


33SEE IF EBON Ws LAST XMISSION? 


33 IF NOT: 


z3FIND END OF MESSAGE 


3;SUB START OF MESSAGE 

of! MESSAGE LNGTH IN WORDS 
LENGTH IN MAILBOX 

eS TELL APT TO TAKE MSG. 


33PUT MSG ADDR IN JSR LINKAGE 
RETURN ADDRESS 


PUSH 1559%6 ON STACK 
SI CALL TYPE MACRO 


a eB — FATAL ERROR? 
3 RUNNING UNDER APT? 
zIF NOT: BR 
SEF INISHED LAST MESSAGE? 
7 IF a HE WAIT 
T ERROR a 
URN ADDR. 


:BUMP RET 
Z: TELL abi TO TAKE ERROR 
:3CLEAR FATAL FLAG 


STA N 
3 5POP STACK INTO RO 
;RETURN 
77MESSG. FLAG 


73FATAL FLAG 


SEQ 0047 


pwn a se SS Cee 
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ACNDZAA.PI1 —-15=DEC=82 14:31 APT COMMUNICATIONS ROUTINE SEQ 0048 
(2) 000001 APTENV=001 
(2) 000100 APTSPOOL=100 
(2) 000040 APTCSUP=040 
(1) :STRING INPUT ROUTINE 
(1) 
/ (1) 005426 010346 INSTR: MOV R3,-(SP) ZSAVE R3 ON STACK 
/ 0054 010446 MOV R4.=(SP) SSAVE RG ON STACK 
| (1) 005432 «017637 000006 005450 MOV a4 (SP) , .mSG [GET THE ADDRESS OF THE MESSAGE TO BE PRINTED 
| = 41) 005440 ©062766 000002 000004 ADD #2,4(S ZPOINT TO INSTRUCTION AFTER ADDRESS POINTER 
| = (1) 005446 «104402 .INST1: TYPE :PRINT THE MESSAGE 
(1) 005450 .MSG: 0 MESSAGE IS POINTED TO FROM WERE 
(1) 005452 012704 010360 MOV #INBUF ,R4 :POINT i TO THE INPUT BUFFER 
(1) 005456 012703 000007 MOV #7,R3 [SET THE “WAX IMUM NUMBER OF CHARACTERS ALLOWED 
| (1) 005462 105777 173622 1$: TST8 sstns ZHAS A CHARACTER BEEN RECEIVED? 
(1) 005466 100375 BPL 1$ 31F NO, KEEP WAITING FOR IT 
(1) 005470 117714 173616 MOVB  a$TKB,(R4) TIF YES, SAVE IT IN THE INPUT BUFFER 
(1) 005474 142714 000200 BICB #200, (R4) [KEEP ONLY THE 7-BIT ASCII INFORMATION 
(1) 005500 122427 000015 CMPB sé (RG) +415 ‘1S THIS CHARACTER A LINE FEED? 
(1) 005504 001417 BEQ INSTR? SIF SO, TERMINATE THE INPUT SEQUENCE 
(1) 005506 105777 173602 2s: TSTB = aS TPS SIF NOT, CHECK TO SEE IF THE CHARACTER CAN PRINT 
(1) 005512 100375 BPL 2$ TIF WE CAN'T, WAIT UNTIL WE CAN 
(1) 005514 017777 173572 173574 MOV a$TKB,aSTPB [ECHO THE CHARACTER BACK 
(1) 005522 005303 DEC R3 [REDUCE THE NUMBER OF CHARACTERS RECEIVED 
(1) 005524 001356 BNE 1 SIF WE DON'T HAVE 7, get SOME MORE 
(1) 5526 012604 MOV (SP)+,R4 TIF WE HAVE 7, RESTORE R 
(1) 0055 012605 MOV (SP) + R3 RE TORE R 
(1) 005532 010346 .INSTE: MOV R3,-(S§P) [SAVE R3 ON THE STACK 
(1) 005534 010446 MOV R4,=(SP) SSAVE R& ON THE STACK 
(1) 005536 104402 001356 TYPE  ,$QUES :PRINT A QUESTION MARK... WHAT'S GOING ON? 
(1) 005542 000741 BR * INSTI 760 PRINT THE MESSAGE AGAIN 
(1) 005544 012604 INSTR2: MOV (SP) +,R4 :RESTORE R 
(1) 005546 012603 MOV (SP)+.R3 SRESTORE RS 
(1) 005550 000002 RTI [RETURN TO THE MAIN PROCEDURE 
(1) :CONVERT ASCII STRING TO OCTAL 
(1) 
(1) 005552 010546 .PARAM: MOV RS,-(SP) ZSAVE RS ON THE STACK 
(1) 005554 01044 MOV R4,-(SP) [SAVE R4 ON THE STACK 
(1) 005556 01660 MOV 4(§P),R5 [GET THE SETUP INFORMATION POINTER 
(1) 005562 012537 005742 MOV (R5)*,LOLIM [SET THE LOW LIMIT FOR THE INPUT 
(1) 005566 012537 005744 MOV (R5)+,HILIM :SET THE HIGH LIMIT FOR THE INPUT 
(1) 005572 012537 005746 MOV (R5)*,DEVADR § ;SAVE THE ADDRESS WHER E THE RESULT wit BE STORED 
(1) 005576 112537 005750 mMOV8 = (R5) +. LOBITS :GET THE MASK OF THE INCORRECT BITS 
(1) 005 112537 005751 MOVB (R5)+.ADRCNT :GET THE Count OF ITERS TO BE STORED 
(1) 005 010566 000004 MOV R5,4(SP) :POINT ERE MAIN LINE PROGRAM WILL RESUME 
(1) 005612 005005 PARAM1: CLR R5 EINITIALLZE THE ASCII TO OCTAL RESULT WORD 
(1) 005614 012704 010360 MOV #INBUF .R4 ‘POINT TO THE I 
(1) 005620 122714 000015 CMPB «#15, (R4) [1S THIS CHARACTER A CARRIAGE RETURN? 
(1) 005624 001420 BEQ PARERR SIF SO, PRINT THE MESSAGE 
(1) 005626 121427 000060 1$: CMPBs«(RG) , #60 SIS THIS CHARACTER BELOW THE NUMERIC RANGE ? 
(1) 005632 002415 BLT PARERR :I1F SO, GO PRINT THE MESSAGE AGAIN 
(1) 005634 121427 000067 CMPB ss (RG) , #67 [1S THIS CHARACTER ABOVE THE NUMERIC RANGE? 
(1) 005640 003012 BGT PARERR [IF SO, GO PRINT THE MESSAGE AGAIN 


ce Fh OO ert 


! 
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ad) 005642 142714 000060 BICB #60,(R4) 
(1) 005646 152405 BISB = (R4S+,R5 
(1) 005650 122714 000015 CMPBsé#15,, (Ra) 
(1) 005654 001406 BEQ LIMITS 
(1) 005656 006305 ASL R5 

| (1) 005660 006305 ASL R5 

| (1) 005662 006305 ASL R5 

| (1) 005664 000760 BR 1$ 
(1) 005666 104404 PARERR: INSTER 

| (1) 005670 750 BR PARAM1 
(1) 
(1) ’ 
(1) 005672 020537 005744 LIMITS: CMP R5,HILIM 
(1) 005676 101373 BHI PARERR 
(1) 005700 020537 005742 CMP RS,LOLIM 
(1) 005704 103770 BLO PARE 
(1) 005706 133705 005750 BIT8 LOBITS,RS 
(1) 005712 001365 BNE PARERR 
> 
(1) 005714 013704 005746 MOV DEVADR,R4 
(1) 005720 010524 1$: MOV RS, (RG)+ 
(1) 005722 062705 000002 ADD #2. 
1) 3726 105337 005751 DECB ADRCNT 
(1) 005732 001372 BNE 1$ 
(1) 005734 012604 MOV (SP)+,R4 
(1) 005736 012605 MOV (SP)+.R5 
(1) 005740 000002 RTI 
(1) 005742 000000 LOLIM: 0 
(1) 005744 000000 HILIM: 0 
(1) 005746 000000 DEVADR: 0 
(1) 005750 000 LOBITS: .BYTE 0 
(1) 005751 000 ADRCNT: .BYTE 0 
(1) 
4 ; e (8 em em or oe te wm me Sn ee a ee 
(1) 005752 016637 000004 001404 .SAVOS: MOV 4(SP), SAVPC 
(1) ZSAVE RO-R5 
(1) 005760 010537 001340 svO5: MOV RS, SREGS 
(1) 005764 010437 001336 MOV RG, SREGS 
(1) 005770 010337 001334 MOV R3,$REG3 
(1) 005774 010237 001332 MOV R2,$REG2 
(1) 010137 001330 MOV R1,$REG1 
(1) 010037 001326 MOV RO. $REGO 
(1) 006010 006002 RTI 
(1) ZRESTORE RO-RS 
(1) 
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SEQ 0049 


ISOLATE THE NUMBER He pe ey REPRESENTS 
: CONCATENATE THESE BITS TO THE ea yy EXISTING STRING 
31S THE ere iF tne a CARRIAGE RETURN? 


E TIME TO MAKE ROOM F 


3N HREE BITS 

260 GET THE NEXT CHARACTER 

s THERE WAS AN ERROR... GO PRINT MESSAGE AGAIN 
ZTRY GETTING THE PARAMETERS AGAIN 


sTEST TO SEE IF NUMBER IS WITHIN LIMITS 


soues RESULT EXCEED ITS MAXIMUM CORRECT VALUE? 
F YES, GO PRINT THE MESSAGE AGAIN 
ES LOWER T ALL 


E AN 
SIF SO, GO PRINT THE MESSAGE AGAIN 


STORE NUMBER AT SPECIFIED ADDRESS 


sPOINT = THE LOCATION WHERE THE RESULT WILL BE STORED 
sSTORE THE RESULT 
ZCALCULATE THE NEXT DATUM 
REDUCE COUNT OF STORED a the IS IT EXCEEDED? 
: ‘ae a GO STORE THE NEXT DATUM 
RESTORE R5 
RETURN TO THE MAIN PROGRAM 
sLOWEST ACCEPTABLE VALUE 
SHIGHEST ACCEPTABLE 
LOCATION a RESULT WILL BE STORED 
INCORRECT BITS MASK 
COUNT OF ITEMS TO BE STORED 


SAVE PC OF TEST THAT FAILED AND RO-R5 


sSAVE R7 (PC) 


SAVE RS 


LEAVE. 


We oeES Ber ctcitancaattnnianansnihatinnenen mesic 


; « 
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(1) 006012 013700 001326 .RESOS: MOV SREGO,RO sRESTORE RO 
(1) 006016 013701 001330 MOV SREG1.R1 TRESTORE R1 
(1) 22 013702 001332 MOV SREG2.R TRESTORE R 
(1) 006026 013703 001334 MOV SREG3.R TRESTORE R 
(1) 006032 013704 001336 MOV SREGS RG TRESTORE R& 
(1) 006056 013705 001340 MOV SREGS.RS SRESTORE RS 
(1) 006042 000002 RTI SLEAVE 
(1) :CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 
(1) 
(1) 006044 104402 001357 .CONVR: TYPE  ,S$CRLF :PRINT A CARRIAGE RETURN 
(1) 006050 010046 “CNVRT: MOV RO, =(SP) 7SAVE RO 
(1) 006052 010146 MOV R1,=(SP) tSAVE R1 
(1) 006054 010346 MOV R3,=(SP) : R3 
(1) 006056 010446 MOV R4,=(SP) : Re 
(1) 006060 010546 MOV R5.=(SP) RS 
(1) 006062 017601 000012 MOV a13(SP),R1 :PLACE THE ADDRESS OF THE ARGUMENTS IN R1 
(1) 006066 00002 000012 ADD #2,12(SP) :POINT TO WHERE MAIN PROGRAM WILL RESUME 
(1) 006074 012137 006220 MOV (Ri)+,WRDCNT | :GET NUMBER OF WORDS TO BE PRINTED 
(1) 006100 112105 1$: MOVB = (R1)#.R5 ?GET THE NUMBER OF CHARACTERS TO BE PRINTED 
(1) 006102 112100 MOVB (R1)+#.RO :GET THE NUMBER OF SPACES TO PRINT 
(1) 006104 013104 MOV a(R1)+,R4 [COPY THE WORD TO BE CONVERTED 
(1) 006106 110537 006222 MOVB = RS, CHRCNT [COPY THE CHARAC TER COUNT 
(1) 006112 010403 3s: MOV R4.R3 [COPY THE ARGUMENT WORD AGAIN 
(1) 006114 042703 177770 BIC #°C<7>,R3 SISOLATE THREE BITS TO BE TREATED AS A CHARACTER 
(1) 006120 062703 000060 ADD #060,R3 [MAKE AN ASCII CHARACTER OUT OF THEM 
(1) 006124 110346 MOVB R3,-(SP) SSAVE THAT CHARACTER 
(1) 006126 006004 ROR RG [MOVE TH HE NEXT THREE BITS INTO PLACE 
(1) 006130 006204 ASR RG [MOVE THEM AGAIN 
(1) 006132 006204 ASR RG TAND FINALLY A THIRD TIME 
(1 006134 005305 DEC R5 : REDUCE CHARACTER COUNT.ARE ALL CHARACTERS 
(1) 006136 001365 BNE 3$ [IF NO, GO BUILD THE NEXT ONE. 
(1) 006140 012703 010422 MOV #MDATA,R3 ‘NOW POINT TO WHERE NUMBER WILL BE PRINTED FROM 
(1) 006144 112623 4$: MOVB = (SP) +, (R3)+ [STORE THE CHARACTER, STARTING WITH THE MOST 
(1) 006146 105337 006222 DECB = CHRCNT ;REDUCE COUNT; ARE ALL CHARACTERS TRANSFERRED? 
(1) 006152 001374 BNE 4$ NO, GO TRANSFER ANOTHER 
(1) 006154 105700 TSTB = RO :ARE ANY SPACES TO Be P PRINTED? 
(1) 006156 001404 BEQ 6$ NO, DON'T SET UP ANY 
(1) 006160 112723 000040 5$: MOVB #040,(R3)+ SADD A SPACE TO THE OUTPUT BUFFER 
(1) 006164 105300 DECB = RO ZREDUCE THE COUNT. SHOULD WE PRINT MORE? 
(1) 006166 001374 BNE 5$ SIF YES, GO ADD ANOTHER SP 
(1) 006170 105013 6$: CLRB = (R?3) [TERMINATE THE OUTPUT BUFFER WITH A ZERO 
(1) 006172 104402 010422 TYPE ,MDATA SPRINT THE STRING WE ust 
(1) 006176 005337 0 DEC WRDCNT :REDUCE THE WORD C ARE ANY MORE WORDS LEFT? 
(1) 006202 001336 E SIF YES, GO CONVERT ren 
(1) 006204 012605 MOV (SP)+,R5 RESTORE R 
(1) 006206 012604 MOV (SP)+.RG SRESTORE Ra 
(1) 006210 012603 MOV (SP)+-R3 RES 
(1) 006212 012601 MOV (SP)+-R1 :RESTORE R1 
(1) 006214 0126 MOV (SP)+-RO SRESTORE RO 
(1) 00621 [RETURN TO THE MAIN PROGRAM 
(1) 006220 000000 WRDCNT: 0 
(1) 006 32 000 CHRCNT: .BYTE :NUMBER OF CHARACTERS TO PRINT 
(1) 80635 000 SPACNT: .BYTE 0 ‘NUMBER OF SPACES TO PRINT 








ee sn ee eae 
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006224 000000 BINWRD: 0 


TRAP DISPATCH SERVICE 

ARGUMENT OF TRAP IS EXTRACTED 

sAND USED AS OFFSE% TO OBTAIN POINTER 
TO SELECTED SUBROUTINE 


006226 010046 -TRPSR: MOV RO,=(SP) sSAVE_RO. pred te TO FIND TRAP ROUTINE 
006230 016600 000002 MOV (SP), oRO GET ag DRESS 


006236 111000 MOVB (RO) ,RO GET RIGHT BYTE . ok tat OFFSET) 

006240 006300 ASL RO ;POSITION OFFSET FOR TABLE INDEXING 

006242 016000 001742 MOV - TRPTAB(RO) ,RO 3PLACE INDEXED ADDRESS OF TABLE IN RO 

006246 000200 RTS RO z TRANSFER TO THAT ADDRESS AND RESTORE OLD RO 


sDEVICE CLEAR ROUTINE 
ISSUE A DEVICE CLEAR 


006250 -DEVICE.CLR: 


006250 052777 000020 173532 BIS MDCLR,@DZVCSR  ;SET DCLR 
006256 032777 000020 173524 1S: BIT #DCLR,aDZVCSR ;DID IT CLEAR? 
006264 001374 BNE 1$ 7BR IF 
006266 000002 RTI sEXIT ROUTINE 
;ROUTINE TO HANDLE MAINTENANCE BIT SETTING WITH DEVICE CLEAR 
10441 -DCLASM: DEVICE. CLR s ISSUE A DEVICE CLEAR 
006272 153777 001424 173510 BISB  MNTFLG,@DZVCSR :LOAD THE MAINTENANCE BIT IF IT IS I MODE 
006300 000002 RTI SRETURN TO CALLING ROUTINE 
006302 -DELAY: 
006302 010046 MOV RO,-(SP) ZSAVE RO 
006 013700 006320 MOV DLYCNT,RO :SET COUNT 
006310 005300 1$: DEC RO :DELAY 
006312 001376 BNE 1$ ; 
006314 012600 MOV (SP)+,RO SRESTORE RO 
006316 000002 RTI SLEAVE ROUTINE 
006320 000001 DLYCNT: .WORD 1 :PATCHABLE LOC FOR MORE TIME 


zsADVANCE TO NEXT TEST HANDLER 


BL EQ&B& BEEBE PEEP ERP PPR EPRPRUOUPUOPULOPUPUPRLPRPRBLBOLOL POLLO LPL LPP PP OP Oe Pe 
hme a ss et a tt a ot a a dt 8 oe es hs a Ss SS FS ss Ss 8 Ss Ss ss SS ss HH es 
er er et ee et ee et er er er er ee er er ee a a a a a ea ee a es VS SY YS YY Sa 
3 
Ww 


006322 013716 001362 -ADVANCE:MOV —NEXT,, (SP) sCRUNCH STACK WITH ADDRESS OF SCOPE C 
006326 005037 001364 CLR LOCK “RESET TIGHT LOOP A oe 
006332 000002 RTI SCHECK TO SEE IF OLD TEST GETS REPEATED 
zROUTINE TO SHIFT LINE POINTER 
SAND SWITCH TESTS IF NECESSARY 
006334 106302 .SHIFT: ASLB = R2 :POINT TO THE NEXT LINE 
006556 032702 000020 BIT #B1T4,R2 SHAVE WE PASSED ALL ihANe POINTERS? 
006342 001402 BEQ 1$ [IF NOT, RETURN TO THE T 
006344 022626 POP2SP [REMOVE THE TRAP CALL FROM THE STACK 
006346 104400 ADVANCE :G0 TO THE NEXT TEST 


39 





4 
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CNDZAA.P11 15=DEC APT COMMUNICATIONS ROUTINE 
Hy 006350 000002 1$: RTI 


sRETURN TO THE PRESENT TEST 


SEQ 0052 
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ay gLINE PARAMETER REGISTER SETUP ROUTINE 
(1) 006352 010146 .LPRSET :MOV R1,=(SP) sSAVE CONTENTS OF R1 
(1) 006354 910 46 MOV RD’ (SP) i SAV E CONTENTS OF R2 
(1) 006356 013701 001370 MOV PA VE DEF FAULT PARAM. INTO R1 
(1) 006 01270¢ 000001 MOV #1 ne INIT. FoR INE 1 
(1) 006 91017 173426 1$: MOV R1,aDZVLPR LOAD PARAM. REGISTER 
(1) 00637 5201 INC R1° :SET R1 FOR NEXT LINE 
(1) 006374 1 302 ASLB sR :SET R2 FOR NEXT LINE 

| (1) 006376 032702 000020 BIT #B1T4,R2 ZALL LINES DONE? 
(1) 006402 001771 BEQ 1$ TIF NO pt gap NEXT LINE 
(1) 006404 012602 MOV (SP)+,R2 SRELOAD R2 
a) 906406 012601 MOV (SP)+,R1 {RELOAD R1 

| (1) 00641 RTI RETURN 

(1) ;ROUTINE TO ZERO DATA BUFFER 

(1) 006412 010046 .BUF SET :MOV RO,=(SP) ZSAVE CONTENTS OF RO 
(1) 006414 012700 001426 MOV #100, RO :SET RO TO TOP OF BUFFER 
(1) 906420 005020 1$: CLR (RO)+ SCLEAR BUFFER LOCATION 
(1) 006422 022700 001446 CMP #STOP,RO :1S BUFFER ALL CLEARE 
(1) 006426 001374 BNE ZIF NOT CLEAR NEXT LOCATION 
(1) 006430 012600 MOV (SP)+,R0 SRELOA 
(1) 006432 000002 RTI RET 
(1) ZERROR HANDLER 
(1) 
(1) 006434 737 007062 SERROR: JSR PC, SERV.G :FIND OUT IF 0” WAS HIT 
(1) 006640 032777 010000 172636 BIT #SW12,aSuR 'BELL ON ERR 
(1) 006446 001406 BEQ XBX BR IF NO BELL 
(1) 006650 105777 172640 TST asTPs TTY READY. 
(1) 006454 100003 BPL XBX {DON'T WAIT IF ay NOT READY. 
(1) 006656 112777 000207 172632 MOVE #207, a$TPB [PUSH A BELL AT T Y. 
(1) 006464 032777 02 172612 XBX: BIT #Sw18,aSuR :DELETE ERROR PRINT OUT? 
(1) 006472 001113 BNE HALTS [BR IF NO PRINT OUT WANTED. 
(1) 006474 021637 001262 CMP (SP) , SERRPC [WAS THIS ERROR FOUND LAST TIME? 
(1) 006500 901404 BEO :BR IF 
(1) 006502 011637 001262 MOV (SP) » SERRPC SRECORD BEING HERE 
(1) 906506 105037 00124 CLRB_ ss SERFLG [PREPARE HEADER 
(1) 512 104407 1$: SAVOS SSAVE ALL PROC REGISTERS 
(1) 006514 011605 MOV (SP) RS :GET THE PC OF ERR 
(1) 006516 162705 000002 SUB R5 3GET ADDRESS OF TRAP CALL 
(1) 522 011504 MOV (R5) RG [GET ERROR INSTRUCTION 
(1) 906524 110437 001260 MOVE R4,SITEMB :COPY TEST NUMBER FOR APT HANDLING 
(1) 006530 006304 ASL RG [MULT BY TwO 
(1) 006532 061504 ADD (RS) RG DOUBL 
(1) 5 304 ASL R4 SMULT AGAI 
(1) 5 704 177001 BIC #177001,R4 SCLEAR 
(1) 54 704 16034 ADD #. ERRTAB, RG GET 
(1) 346 012437 72 MOV (R4)+,ERRMSG GET ERROR MESSAGE 
(1) 552 012437 MOV (R4)+.DATAHD :GET DATA HEADRER 
(1) 356 11437 71 MOV (R4) ,DATABP :GET 
(1) 0065 05737 00124 TSTB =—s- SERFLG > TYPE NEADERS- 
(1) 366 001403 BEQ TYPMSG : Y 
(1) 0065 5737 006716 TST DATABP *DOES DATA TABLE EXIST? 


ET TS A st st 


> 
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CNDZA- 
CNDZAA.P APT COMMUNICATIONS ROUTINE SEQ 0054 
/ 1) 006576 001044 BNE TYPDAT 3BR IF YES. 
1) 006576 «104402 001357 TYPMSG: TYPE  ,$CRLF TTYPE A CARRIAGE RETURN 
1) 00660 10049 001 57 TYPE  ,$CRLF [AND TYPE ANOTHER 
| @) 0057 1 TST OCk 
/ (1) 006612 «00740 BEQ 
i 006614 104402 00777 TYPE  ,MASTEK 
a) 10440 77 1$: a, Be 
| «4 & 10441 7054 CNVRT {XTSTN :SHOW IT 
/ (1) 006630 10440 010055 TYPE § [MERRPC STYPE PC, 
(1) 006634 10441 7046 CNVRT [ERTABO :SHOW IT 
(1) 006640 104402 00772 TYPE [MCSRX 
(1) 006644 104412 004340 CNVAT ° 
/ (1) 006650 104402 1357 TYPE  -$CRLF :GIVE A CR/ 
(1) 006654 112737 177777 001247 MOVB #-1,$ERFLG =NO MORE READER UNLESS NO DATA TABLE. 
(1) 006662 005737 006672 TST ERRMSG [1S THERE AN ERROR MESSAGE? 
a) 006666 001402 BEQ WBS.FM [BR IF NO. 
(1) 006670 104402 TYPE ‘TYPE 
(1) 006672 000000 ERRMSG: 0 t+ ERROR MESSAGE 
(1) 006674 WTBS.FM: ; 
(1) 006674 005737 006704 TST DATAHD [DATA HEADER? 
(1) 006700 00140 BEQ TYPDAT BR IF NO 
(1) 006702 10440 TYPE ;T¥P 
(1) 006704 DATAHD: 0 DATA HEADER 
(1) 006706 005737 006716 TYPDAT: TST DATABP [DATA TABLE? 
(1) 006712 001402 BEQ RESREG [BR IF NO. 
(1) 006714 104411 CONVRT : 
(1) 006716 000000 DATABP: 6 : DATA TABLE 
(1) 7 : 104410 RESREG: RESOS SRESTORE PROC REGISTERS 
(1) 722 122737 000001 001140 HALTS: CMPB $#APTENV,SENV 1S APT RUNNING? 
(1) 006730 001007 BNE 15$ :SKIP APT CALL IF NOT 
(1) 006732 113737 001260 006744 MOVB = SITEMB, S$ [COPY ERROR NUMBER 
(1) 006740 004737 005176 JSR PC ,SATY4 :CALL APT SERVICE 
(1) 006744 000000 5$: “WORD 0 TERROR NUMBER STUCK HERE 
(1) 006746 000777 10$: BR 10$ [LOCK UP HERE 
(1) 006750 022737 004324 000042 15$: CMP WSENDAD,a#42 CHECK TO SEE IF IN ACT=11 MODE 
(1) 006756 001403 BEQ 20$ 3 1F $0, HANDLE ACCORDINGLY 
(1) 006760 005777 172320 TST aSWR HALT ON ERROR? 
(1) 006764 100004 BPL EXITER BR I IF NO HALT ON ERRO 
(1) 006766 016677 000002 172312 208: MOV 2(SP) ,aDISPLAY NOW ERROR BC SN BATA DISPLAY 
(1) 006774 000000 HALT SALT 
(1) 006776 005237 001256 EXITER: INC SERTTL [UPDATE ERROR COUNT 
(1) 007002 004737 007062 JSR PC, SERV. G. [FIND OUT IF *G WAS TYPED 
(1) 007006 032777 000400 172270 BIT #S008,a 3G0TO TOP OF TEST? 
(1) 007014 001007 BNE BR IF Y 
(1) 007016 032777 002000 172260 BIT #SW10,aSuR GOTO NEXT TEST? 
(1) 007024 001407 BEQ BR IF 
(1) 007026 013737 001 001252 MOV NEXT, SLPADR 3SET FOR NEXT TEST 
(1) 0070 012706 001120 1$: MOV #STACK,SP SET S 
(1) 007040 000177 172206 JMP aSLPADR iG0TO SPECIFIED TEST 
(1) 007044 00002 : RTI RETURN 
(1) 007046 000001 ERTABO: 1 
(1) 007050 006 002 .BYTE 6,2 
(1) 007052 001404 SAVPC 
(1) 0070 01 XTSTIN: 1 
(1) 007056 002 002 .BYTE 2,2 
(1) 001246 $TSTNM 
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2 CNDZAA.P11 =DEC T COMMUNICATIONS ROUTINE SEQ 0055 
(1) 007062 017746 172224 SERV.G: MOV a$TkB,-(sP) jOTHERWISE, GET THE LAST CHARACTER TYPED 
(1) 0070 ri6 00020 BIC agit? (SP) ‘STRIP PARITY(EIGHTH) BIT 
(1) 007072 122726 00000 CMPB .(SP)4 31S IT *G? 
(1) 007076 001076 BNE Z1F NOT. IGNORE INPUT 
(1) 007100 032777 004000 172202 BIT #4000, a$TKS :RX BUSY? 
(1) 007106 001365 BNE SERV.G :BR IF YES 
(1) 007110 GETSWR= . z2GPA 
/ (1) 007110 -:017737-:172170 007316 MOV aswr,90$ ZSAVE (SWR 
1) 007116 104408 007276 1$: TYPE ,89$ i TYPE MEADER FOR OLD SWITCH REGISTER 
/ (1) 007122 104412 007310 CNVRT [88% STYPE THE NUMBE L 
1) 007126 104402 007320 TYPE 91$ SAFTER HAVING CONVERTED IT TO ASCII 
/ (1) 007132 105037 007324 CLRB 928, [CLEAR SWR CHANGE F 
(1) 007136 =005077 172142 CLR aSwR iCLEAR THE SOFTWARE SWITCH REGISTER 
| (1) 007142 «105777 172142 3$: TST8 aSTKS ‘WAIT FOR D 
| 1) 007146» 100375 BPL 3$ SCONTINUE WAITING FOR IT 
(1) 007150 017746 172136 MOV aSTKB,=(SP) PUT THE CHARACTER ON THE STACK 
| 1) 007154 042716 000200 BIC #B1T7. (SP) SSTRIP PARITY BIT 
| (1) 007160 122726 000015 CMPB ss #' 15, (SP) + SIS IT THE CARRIAGE RETURN CHAR? 
| 1 007164 001433 BEQ Z1F $O, GO PRINT 
(1) 007166 105777 172122 2$: TST8 = aS TPS iIS THE OUTPUT BUFFER AVAILABLE 
| (1) 007172 100375 BPL 2$ zI1F AIT FOR IT TO BE READY 
(1) 007174 105237 007324 INCB «92S EINDIcate™ THAT THE SWR WAS CHANGED 
(1) 007200 014677 172112 MOV -(SP) ,a$TPB LACE THE CHARACTER THERE (ECHO BACK) 
(1) 007204 000241 CLC Get READY TO ROTATE 
(1) 007206 006177 172072 ROL aSwR ‘MOVE THE EXISTING BITS OVER 
(1) 007212 006177 172066 ROL aSwWR :TO MAKE ROOM FOR -THE INCOMING 
(1) 007216 006177 172062 ROL aSwR + THREE BITS FROM THIS CHARACTER 
(1) 007222 103735 BCS 1$ ERROR 
(1) 007224 022627 000060 CMP (SP)+, #60 31S IT LOWER THAN 0? 
(1) 007230 002732 BLT 1$ SIF $O, GO ASK AGAIN 
(1) 007232 026627 177776 000067 CMP -2(SP) ,#67 :1S IT HIGHER THAN 7? 
(1) 007240 003326 BGT Z1F SO, GO ASK AGAIN 
(1) 007242 042746 177770 BIC #°C<7>,-(SP)  SISOLATE INFORMATION BITS 
(1) 007246 052677 172032 BIS (SP)+,aSwR 3ADD THEM TO THE SWITCH REGISTER 
(1) 007252 000733 BR 3$ 3G0 CHECK FOR THE NEXT CHARACTER 
(1) 007254 105737 007324 4$: TSTB «=-«92 SHAS THE SWR BEEN CHANGED? 
(1) 007260 001003 BNE 5$ 31F YES GO TYPE CRLF 
(1) 007262 013777 007316 172014 MOV 90$,aSwR SIF NOT RESTORE SWR 
(1) 007270 104402 001357 5$: TYPE ,$CRLF [TYPE A CARRIAGE RETURN AND LINE FEED 
(1) 007274 000207 6$: RTS PC ZRETURN TO CALLING PROCEDURE 
(1) 007276 020200 051450 051127 89$: .ASCIZ <200>? (SWR)=/? 
(1) 036451 000057 
(1) EVEN 
(1) 007310 000001 Mm 9 
(1) 007312 006 000 BYTE 6,0 
(1) 007314 007316 0$ 
(1) 007316 
(1) 007320 036457 000057 91$ SASCIZ. ?/=/? 
| (1) 007324 a:  . 
(1) 007326 EVEN 
(2) .SBTTL POWER DOWN AND UP ROUTINES 
at tt tie beta ne 
(2) POWER DOWN ROUTINE 
(2) 007326 012737 007472 000024 jpoweR MOV #SILLUP ,a#PWRVEC ::SET FOR FAST UP 
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3 CNDZAA.P11. 9 15=DEC=R2 14:31 POWER DOWN AND UP ROUTINES SEQ 0056 
(2) 007334 012737 000300 000026 MOV #PR6, QsPURVEC +2 Hit & 
(4) 007342 010046 MOV RO,-(SP) RO ON STACK 
(4) 007344 010146 MOV R1.=(SP) R1 ON STACK 
(4) 007 2 910946 MOV R2,-(SP) HPS + 4 ON STACK 
(4) 007350 010346 MOV R3,°(5P) H R3 ON STAC 
(4) 007352 010446 MOV R4,=(SP) ‘bus R4 ON STACK 
(4) 007354 010546 MOV R5,°(SP) 33PUSH RS ON STACK 
| 4) 007356 017746 722 MOV asur =(SP) t:PUSH @SWR ON STACK 
/  €2)> 007 01065 007476 MOV SSAVRO T:SAVE SP 
| (2) 007366 «012737 +007400 000024 - MOV. ASPURUPSS#PURVEC’ Z3SET UP VECTOR 
(2) 007374 000000 HALT 
(2) 007376 000776 BR --2 ZHANG UP 
(3) SSAEKAKAAAKAAFKAAAKAKEKAKAAAKAARAAAAARARARARAREREEARERAEAREEARAEEREEEE 
i 2) :BOWER UP ROUTINE 
| (3) 007400 012737 007472 000024 $PWRUP: MoV #SILLUP,a#PWRVEC ;;SET FOR FAST DOWN 
| (3) 007406 013706 007476 MOV SSAVRO, SP z:GET SP 
| (2) 007612 005037 007476 CLR $SA AVRE 3:WAIT LOOP FOR THE TTY 
(2) 007416 005237 007476 1$: INC SSAVR6 33WAIT FOR THE INC 
(2) 007422 001375 BNE 1$ F WORD 
(4) 007424 012677 171654 MOV (SP)+,aSwR POP STACK INTO @SWR 
(4) 0074 012605 MOV (SP)+,R5 3zPOP STACK INTO RS ; *. 
(4) 007432 012604 MOV (SP)+,R4 3:POP STACK INTO R4 
(4) 007434 012603 MOV (SP)+,R3 7;POP STACK INTO R3 
(4) 007436 012602 MOV (SP)+*,R2 ::POP STACK INTO R2 
(4) 007440 012601 MOV (SP)+,R1 as STACK nie R1 
(4) 007442 012600 MOV (SP)+.RO :POP STACK INTO RO 
(2) 007444 012737 007326 000024 MOV #SPWRON QrPURVEC 58 Ser UP THE POWER DOWN VECTOR 
(2) 007452 012737 000300 000026 MOV #PR6,a#PURVE 0:6 
(2) 007460 104402 TYPE iEREPORF THE POWER FAILURE 
(2) 007462 007500 SPWRMG: .WORD FAIL 7:POWER FAIL MESSAGE POINTER 
(2) 007464 012716 MOV CPC) +e (SP) S:RESTART AT RESTA 
(2) 007466 011024 SPWRAD: .WORD RESTART t RESTART ADDRESS 
(2) 007470 000002 RTI 
(2) 007472 000000 SILLUP: HALT z:THE POWER UP SEQUENCE WAS STARTED 
(2) 007474 000776 BR 72 i BEFORE THE POWER DOWN WAS COMPLETE 
(2) 007476 000000 SSAVR6: 0 THE SP HERE 
(2) 007500 050200 051127 043040 MPFAIL: .ASCIZ <200>/PWR FAILED’ RESTART AT LAST TEST / 
(2) 00754 200 047105 020104 MEPASS: .ASCIZ <200>/END PASS CNDZA= / 
(2) 007567 200 052522 047116 MR: ASC12Z : 00>/RUNNING 
(2) 007603 200 051120 043517 MERR2: <ASCIZ <200>/PROGRAM Indicates NO DEVICES PRESENT./ 
(2) 007652 044600 051516 043125 MERR3: .ASCIZ <500>/ INSUFFICIENT 
(2) 007676 046200 041517 020113 MLOCK: ‘ASCI2 <200>/LOCK ON SELECTED ist 
(2) 00772 103 051123 020072 MCSRX: .ASCIZ 
(2) 007733 126 041505 920078 MVECX: .ASCIZ Vets Py 
(2) 007741 120 051501 Beses MPASSX: .ASCIZ /PASSES: / 
(2) 007752 051105 047522 051522 MERRX: ‘ASCIZ /ERRORS: / 
(2) 00776 124 051505 020124 MTSTN: .ASCIZ TEST NO: / 
(2) 007775 052 000040 MASTEK: .ASCIZ /* 
(2) 010000 052200 050131 020105 MNEW: _ASCI2 <200>/ PE A BIT MAP OF D2V11°S DESIRED ACTIVE: / 
(2) 010055 120 035103 000040 MERRPC: .ASCIZ /PC: / 
(2) 010062 046600 050101 047440 KXHEAD: _ASCIZ £06 0>/MAP OF DZv11 STATUS/<200> 
(2) 010110 044600 046114 043505 MBADLN: “ASCIZ <200>/ILLEGAL ENTRY IN STAGGERED MODE/<200> 
(2) 010152 000002 KSTATQ: 2 
(2) 010154 006 003 .BYTE 6,3 
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002 


000000 
000040 
000105 
010276 
001424 
000111 


010300 
000010 


000123 
010302 
001424 
000002 


001424 
010360 


POWER 


2 
EVEN 
ZE EXTERNAL LOOP BACK 
iI INTERNAL LOOP BACK 
=STAGGERED LOOP BACK 
.SETFLG: hoy a(SP),R5 
BIC #40, INBUF 
CMPB Ss # "E, INBUF 
BNE 4$ 
MOV 1$, (R5) 
CLRB ss MINT F 
BR 7$ 
48: CMPBsé#' "1, INBUF 
BNE 5$ 
MOV 2$,(R5) 
move #MAINT ,MNTFLG 
5$: CMPB es # "SS, INBUF 
BNE $ 
MOV 3$,(R5) 
CLRB = MNTFLG 
7$: ADD #2, (SP) 
RTI 
68: INSTER 
BR .SETFLG 
1$: .WORD 200 
2$: eWORD 0O 
3$: “WORD 100000 


14:36 PAGE 81-38 


DOWN AND UP ROUTINES 


STMP1 
BYTE 6,2 
STMP 


s THIS ROUT INE ESTABLISHES WHICH MAINTENANCE MODE THE DEVICE IS IN 


ot et wie OF TAG 
T EXTERNAL LOOP BACK ? 
$ 


TORE INFO 
- BIT =0 


INTERNAL LOOP BACK ? 


T 
STORE INF 
UP_THE MAINTENANCE FLAG LOADER 
{GET OUT 

seat? STAGGERED LOOP BACK ? 


ZYES STORE INFO 
ZERO BIT s 


: INTERNA 
i STAGGERED = 


SEQ 0057 
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,CNDZA@A_MACY11 30(1046) 15=DEC-82 14:36 PAGE 81-39 
‘'CNDZAA.P11 15=DEC=82 14:31 POWER DOWN AND UP ROUTINES SEQ 0058 


| @ :COMPARE THE FIRST CHARACTER, IN THE TELETYPE INPUT 
 @® IBUFFER TO THE CHARACTERS “E"* AND C'". 
i (2) IF THE CHARACTER IS ‘E'’ CLEAR THE FLAG 
— @ SIF THE CHARACTER IS "C"" SET THE FLAG 
| 2) 010304 017605 900000 .PAWCH:MOV (SP), RS 
(2) O10310 142787 900040 910360 Bee #40, 1NBUF :SET FOR LOWER CASE INPUT 
| 2) 010316 122737 000105 010360 CMPB | #°E, INBUF p18 17 '€™ 2 
(2) 010324 001002 BNE I$ 
(2) 010326 105015 CLRB (RS) :000 
(2) 010330 000406 BR $ 
(2) 010332 122737 000103 010360 1$:  CMPB °C, INBUF :1S 17 “C2 
(2) 010340 001005 BNE 
(2) 010362 112715. 177777 MOVE = #=1,, (RS) 33177 
(2) 010346 062716 000002 28: ADD 2, (SP) 
(2) 010352 2 RTI 
(2) 010354 104404 3$ INSTER sRETRY 
(2) 010356 000752 BR PAWCH 
gs BUFFERS FOR INPUT-OUTPUT 
(2) 010360 000000 INBUF: 0 
(2) 010422 =2#40 
(2) : TEMP: 0 ; TEMP AREA UNUSED. 23GPA 
(2) 3 .=.+40 ; DELETED TO CONSERVE SPACE 32GPA 
(2) 010422 000000 MATA: 0 
2) 010464 5.440 
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CNDZAA.P11 15=DEC-82 14:31 POWER DOWN AND UP ROUTINES SEO 0059 
iH 
| SROUTINE USED TO CYCLE’ THROUGH uP TO SIXTEEN pzv11'"S 
| STHIS ROUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC 
/ 2) ZAND RKUNS THE SPECIFIED DZV11°S. THIS ROUTINE *MUST® 
| 3) [BE RUN FIRST BEFORE ENTERING THE DIAGNOSTIC FOR THE 
| :SETUP NECESSARY 
| 2) 
(2) 010464 005737 001406 CYCLE: TST DZVACTV ZARE ANY D2V11"S TO BE TESTED? 
| (3) 010670 001004 BNE —_'1$ 3BR IF Ok. 
(2) 010472 104402 007603 TYPE  ,MERR2 [NO D02V11°S SELECTED!! 
| (3) 010476 000000 HALT ‘STOP THE SHOW. 
| (2) 010500 000776 BR -2 SDISQUALIFY CONT. SW. 
(2) 010502 013737 004632 001354 1$: MOV SMXCNT, STINES TRESTORE THE NUMBER OF ITERATIONS TO MAKE 
(2) 010510 033737 001412 001406 BIT RUN, DZVACT 31S THIS ONE ‘ACTIVE’ 
(2) 910516 001017 BNE 2$ :BR IF GOOD ONE FOUND. 
(2) 010520 006137 001412 ROL RUN [UPDATE POI 
(2) 010524 005537 001412 ADC RUN SCATCH CARRY FROM R 
(2) 010530 062737 000012 001420 ADD #12, ACTIVE [UPDATE ADDRESS POINTER. 
(2) 010536 022737 001740 001420 CMP #DZV.END, ACTIVE :HAVE WE PASSED THE NEND OF THE MA 
(2) 010544 001356 BNE 1$ :1F NO, KEEP GOING; NOT ALL TESTED. FOR. 
(2) 010546 012737 001500 001420 MOV #D02V.MAP, ACTIVE :RESET ADDRESS POINTER. 
(2) 010554 000752 BR 1$ [KEEP LOOKING FOR ACTIVE pzv11 
(2) 010556 006137 001412 2s: ROL RUN :UPDAT E POIN TER. 
(2) 010562 005537 001412 ADC RUN H CAR 
(2) 010566 013700 001420 MOV ACTIVE RO. GET ADDRESS "POINTER. 
(3) 010572 3737 12 991420 ADD #12, ACTIV [ UPDATE. 
(2) 010600 022737 $09 948 001420 CMP Avie END ACTIVE 
(2) zALL DONE? 
(2) 010606 001003 BNE 3$ [BR IF 
(2) 010610 012737 001500 001420 MOV WDZV.MAP ACTIVE :RESTORE POINTER. 
(2) 010616 012037 001174 3$: MOV (RO)+, $BASE [LOAD SYSTEM CTRL. REG 
(2) 010622 012037 002040 MOV (RO)*,DZ2VRIV LOAD VECTOR 
(2) 010626 012037 001366 MOV (RO) +, LINE ZSET UP DZV LINES ACTIVE 
(2) 010632 012037 001370 MOV (RO) +, PAR [SET UP PARAMETERIZATION 
(2) 010636 012037 001372 MOV (RO) +. MODE [SET UP MAINTENANCE MODE 
(2) 010642 105037 001424 CLRB  MNTFLG ;RESET MAINT. FLAG IF 
(2) 010646 005737 001372 TST MODE ZRUNNING TESTS 
(2) 010652 001003 BNE 9$ N 
(2) 010654 112737 000010 001424 MOVB #MAINT,.MNTFLG © SINTERNAL MAINT. MODE 
(2) 010662 004737 011030 9$: JSR PC ,DZVLEV SET UP 
(2) 010666 005737 000042 TST and2 TARE WE UNDER MONITOR | CONTROL? 
(2) 010672 001051 BNE 7$ iI ves SKIP THIS $ 
(2) 010674 032777 000002 170402 BIT #SW01,aSwR wOiz1, GET SFaatinG TEST # 
(2) 010702 001445 BEQ 7$ ‘aR ee NO “test IS TO BE INPUTTED 
(2) 010704 106408 001357 4$ TYPE  ,$CRLF 
(3) 010710 10440 INSTR ZCALL THE STRING INPUT ROUTINE 
(3) 010712 007763 MTSTN SPOINTER TO MESSAGE TO BE PRINTED 
(3) 010714 104405 PAR [CALL THE OCTAL TO ASCII CONVERT ROUTINE 
(3) 010716 000001 1 ZLOWEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(3) 010720 001000 1000 SHIGHEST LEGITIMATE VALUE OF EXPECTED RESPONSE 
(3) 519722 001246 STSTNM : TO MAP LOCATION TO BE FILLED 
(3) 010724 000 .BYTE 0 [MASK OF INVALID BITS FOR THIS PARAMETER 
(3) 010725 901 "BYTE 1 : PARAMETERS TO STORE 
(2) 010726 012700 012024 MOV #TST1,RO 
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? CNDZAA.P11 - 15=DEC=82 14:31 OWN AND UP ROUTINES SEQ 0060 
Bort oe ee | 
(2) 010740 022760 012737 000002 CMP #12737,2(RO) 
(2) 010746 001014 BNE 
 (2)-:010750 023760 001246 000004 CMP STSTNM,4(RO) 1S THIS THE TEST 
/ (3): 010756 +—001010 BNE 6$ SIF NOT, DON'T PROCESS NUMBER 
(2010760 010037 +001252 MOV RO, SLPADR SAV na 
(2) 010764 062737 900002 001252 ADD #2.S$LPADR [POP OVER PREVIOUS SCOPE 
(2) 010772 «104402 00135 TYPE SCRLF 
| 2) 010776 «000412 BR $ 
2) 011000 005720 68: TST (RO) 
/ (2) 011002 020027 015502 CMP RO, #TLAST+10 
| (2) 011006 001351 BNE 
| (2) 011010 104408 001356 TYPE SQUES 
— @) -019016 00073 BR 
| (2) 011016 012737 012024 001252 rs: MOV #TST1,$LPADR § ;PREPARE TEST ADDRESS 
2) 011026 000177 170222 RESTART : JMP a@SLPADR G0 START TESTING. «= sUARNING!s+es 
| 2) [THIS JUMP IS USED BY POWER UP ROUTINE!!!! 
(2) :THIS UTILITY SETS uP CSR*S,SETS UP VECTORS. 
; (2) 011030 013700 002040 DZVLEV: MOV DZVRIV,RO :PLACE THE BASE VECTOR ADDRESS IN RO 
(2) 011 062700 000002 ADD #2,R ‘CALCULATE THE RECEIVER INTERRUPT STATUS ADDR. 
(2) 011040 010037 002042 MOV RO.DZVRIS SSTORE IT HERE 
(2) 011044 062700 000002 ADD #2.RO0 ; CALCULATE THE TRANSMITTER INTERRUPT VECTOR 
(2) 011050 010037 002044 MOV RO.DZVTIV [STORE IT 
(2) 011054 062700 000002 ADD #2.RO CALCULATE ONE TRANSMITTER VECTOR STATUS ADDRESS 
(3) 011060 010037 002046 MOV RO.DZVTIS SSTORE IT HERE 
(2) THIS SEGMENT SETS UP POINTERS FOR THE GIVEN D2V11. SBASE IS THE BASE ADDRESS 
(2) 011064 013700 001174 MOV SBASE ,RO ;COPY THE ADDRESS BEING LOADED 
(2) 011070 010037 002010 MOV RO,DZVCSR + XXX0 
(2) 011074 005200 INC 
(2) 011076 010037 002012 MOV RO,MDZVCSR poo 
(2) 011102 005200 INC RO 
2) 011104 010037 002014 MOV RO, DZ VRBUF 20K 
(2) 011110 010037 002020 MOV RO.DZVLPR + XK 
(2) 011114 905200 INC RO 
(3) 11116 010037 00201 MOV RO, HDZVRBUF 0K 
(2) 011122 010037 00202 MOV RO: HDZVLPR XX 
(2) 011126 005200 INC R 
(2) 011130 010037 002024 MOV RO,DZVTCR OKKG 
(2) 011134 005200 INC R 
2) 011136 010037 002026 MOV RO,HDZVTCR 05 
(2) 011142 005200 INC RO 
(2) 011144 010037 002030 MOV RO.DZVMSR O06 
2) 011150 010037 002034 MOV RO.DZVTOR XXX6 
(2) 011154 005200 INC RO 
| $3 bE 010037 002032 MOV RO, HDZVMSR 2007 
(2) 011162 010037 002036 MOV RO-MDZVTDR MXM? 
| (3) 011166 000207 RTS —s- PC 
I 
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CNDZAA.P11 15=DEC-82 14:31 DOWN AND UP ROUTINES 
(2) SCONVERT DECIMAL ASCII STRING TO OCTAL 
(2) 011170 000002 .PARMD: RTI : DECIMAL PARAMETERS UNUSED. 
(2) .REM & : DELETED TO CONSERVE SPACE... 
(2) t..eAND REMAIN UNDER 4kw SIZE. 
(2) .PARMD: MOV (SP) RS 
(2) m3) 98 
(2) MOV (R5)+, 
(2) MOV (R5)*,8$ 
(2) MOVB = (R5)+ 
(2) MOVB  (R5)+.108 
(2) MOV RS, ( 
(2) 28: CLR R5 
(2) MOV #INBUF ,R4 
(2) CMPB #15, (R4) 
(2) BEO 
(2) 1$: CMPB ss (RG), #*0 
(2) BLT 
(2) CMPB es (RG) , #"9 
(2) BGT 
(2) BICB =. # "0, (R4) 
(2) CLR R 
(2) BISB (R4)+,R2 
(2) ADD R2,R 
(2) CMPB «#15, (RG) 
(2) BEQ 4$ 
(2) ASL RS 2x2 
(2) MOV R5,R2  ;SAVE X2 
(3) ASL R5 7X4 
(2) ASL R5 8 
(2) ADD R2,.R5  :TIMES 10 
(2) BR t 
(2) 3$: INSTER 
(2) BR 2s 
(2) :TEST TO SEE If NUMBER IS WITHIN LIMITS 
(2) 4$: CMP R5S,7$ 
(2) BHI 3$ 
(2) CMP R568 
(2) BLO 3 
(2) BITB 4 ©=—-»9$, RS 
(3) BNE 3$ 
(2) ySTORE NUMBER AT SPECIFIED ADDRESS 
(2) MOV 8S,R 
(2) 5$: MOV RS. (R4)* 
(2) ADD #2,R 
(2) DECB sé 
(2) BNE 
3} 6$ + 
(2) 7$: 
(2) 8$: 0 
(2) 9$: .BYTE 0 
(2) 10$: "BYTE 0 


32GPA 


SEQ 0061 
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; END OF .PARMD DELETE RANGE & 


a a ce a ee its + eee 
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SEQ 0062 
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/CNDZA=A MACY11 30(1046) 15=DEC-82 14:36 PAGE 81-44 
\CNDZAA.P11—-:15=DEC-82 14:31 POWER DOWN AND UP ROUTINES SEQ 0063 


(2) sr ait USED TO SET UP a ny ges HD VIA APT. 
IF BIT? IN THE ENVIRONMENT MODE (SENVM) BYTE IS SET 
*THE PROGRAM WILL LOAD ITS PARAMETERS FROM THE ETABLE. 


00 SETAPT: MOV #DZV.MAP,RO sPOINT TO THE DEVICE MAP TABLE 
MO SBASE ,R1 


15 

1174 V :B 

1170 MOV SVECTI Re SBUILD DEVICE VECTORS IN R2 
7007 BIC #°C<770>,R ZSTRIP AWAY OTHER INFORMATION 


1204 MOV #SDDW0,R4 POINT TO THE BEGINNING OF DEVICE PARAMETERS 

1176 MOV SDEVM, RS 3GET THE MAP OF oF be DEVICES 

1414 CLRB DZVNUM INITIALIZE NO. OF DEVICES IN SYSTEM 

1410 CLR SAVACTV CLEAR THE ACTIVE BIT MAP 

006 1$: ROR R5 7GET A DEVICE SELECTION BIT 

103407 BCS 3$ sIF IT IS SELECTED, GO SET UP A 
IF NO MORE ARE SELECTED, GET our OF SETUP 
sPOINT TO NEXT DEVICE DESCRIPTOR 

2$: ADD #10,R1 7s T ADDRE 

#10,R2 Ss 


:GO SEE IF MORE DE 
3$: ROL SAVACTV 44! BIT IN ACTIVE DEVICE MA 
13720 001200 MOV $COw1, (RO)+ : ER LINES IN OPERATION 
12420 MOV (R4)+, (RO) + sLOAD DEVICE PARAMETERS 
13720 001202 MOV $CDW2, (RO)+ LOAD DEFAULT TESTING MODE 
1 

1 


| 3) 
| (2) 
| 2) 
cia 
| =) 
ie 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) VNUM : INCREMENT NO 
(2) MOV R : ADDRES 
(2) sLOAD THE ES 
(2) :GET THE NUMBER OF 
(33 sto OF 
(2) 000757 28 :G0 BUILD TH 
(2) ? : (RO R E DEVICE MAP 
(2) 737 001142 001304 MOV ASSWREG, SWR SSET TO SOFTWARE APT SWITCH REGISTER 
(2) 000207 PC 
3 
(2) z*ROUTINE USED TO “AUTO SIZE’ THE DZV11 
(2) [*CSR AND VECTOR. 
(2) : : 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
(2) 
: 


OOooooooooooooooooocooo ocooo 
a a a Bd os 3 eS ed 4 Ss dt a a ta ed a 
eb ab eh ed ed ab a dd hk a ed on 
PANNE Bot 

nN 

“ 

So 

Nm 

oS 
Ss 


3 
soto 17777 5$ MOV #-1, (RO) TERMINATE THE D 
RTS RETURN TO PRINT STATUS TABLE 


—— 
ao 


s* AND THE VECTOR MAY BE “ANY GHERE IN THE 
:* FLOATING VECTOR RANGE (300:770) 
ge 


320 AUTO.SIZE: 
320 000005 RESET z INSURE A BUS INIT. 
105337 001422 DECB INIFLG ;SHOW THAT I WAS HERE 
CSRMAP: MOV #DZV.MAP R2 sLOAD MAP POINTER. 
012703 001204 MOV #$DDW0,R3 POINT 9 ETABLE DEVICE DESCRIPTOR WORDS 
22 1$: CLR (R2)+ ZERO ENTIRE MAP 
Bee rue 001740 cMP SOCV.END.R2 zAL LL poe? 


BNE F NO 
105037 001414 CLRB DZVNUM SET OCTAL NUMBER OF DZV11°S TO 0 


WWW 


YBN 

MON 
So 
— 

rs 
=] 
Nm 
3 
Ww 
So 
o 


FRE 


012702 001500 MOV #DzV. MAP ,R2 

012701 160000 MOV #160000, R1 ISET FOR FIRST ADDRESS TO BE TESTED 
012737 011626 000004 MOV $904 :SET FOR NON-EXISTENT DEVICE TIME OUT 
05 000040 $: BIS Aly (R1) TRY To. SET MASTER SCAN ENABLE 

052761 000017 000004 BIS »4ERi) sTRY TO TRANSMIT ON ANY L 

005000 CLR [USE RO AS A COUNTER 


me ed ae SS ws =) = 0 4 2 a 
ab hh dk ed ts od 0d 
SWWWw 


Soooooooooooooo 
ONNOMUN 


MSONMAMUALS 
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paeeni P11 


| 


15=DEC-82 14:31 
90371 


~ 
Nm 
- 


000017 000004 
000040 
000020 
000040 
000004 


22 

22 

22 000017 

12 017470 

23 

22 

12 177777 

001414 
000010 

164000 


001414 
001414 
000001 001410 


NSRSENARRSRUROANGHOSE GSONORNGORORNOER 


WISyyses 
S 
w 
~ 


001174 
001202 
000004 
001176 


MUNA ES BEE EEE PEER RRL ESE 


S peeresces 
AGEMOLNEO 

So 

ab 

nm 

—~“ 

Ww 

N 

So 


FN 


000022 
000020 


Sar 
&orm 


ae a a a a es a os ot ss Yt ab et a ad a) ot at) 4 
Ao 


XXL LOOP PLP LOL PAR AOA AL LL Le Pe Pe Pe Pe 
SOOSSOSO COOCSOSOCOSCOOSOCOCOSCOOCSOOOOSOOOOCOOSOSOOOoOSooOSO OOOO OOOOoOOoOOooOoOO 
8 Bk a a td oh oh oh oh oh od 


NRNNINNINININININININI NNN NINNNN NNN NI NNNNININININININININININPINININNINNonopononofnonofpynonuns 
GGG FG 0 0 0 8 9 SB BS 


3:3 


OWER DOWN AND UP ROUTINES 


7$: 


#17,4(R1) 
#B1TS,(R1) 
#20,(R1) 
#40,(R1) 

$ 


5 


HAS TRANSMITTER READY COME UP? 
0, GO GET A FINAL CHECK 


FS 
“REDUCE COUNT. TIME UP? 
SIF NOT, KEEP WAITING 
“ASS *§ NOT A DZV11 
TARE ANY TCR BITS STILL SET? THEY SHOULD BE 
SIF IT'S NOT, ASSUME IT°S NOT A Dzv11 
[1S MASTER SCAN ENABLE STILL SET 
T, ASSUME IT'S NOT A D2V11 


: 2 A E 
:SET DEVICE CLEAR 


4+ SCANNER CLEAR 
NOT ASSUME IT ‘3 NOT DZV 
OF TCR BITS 


R 4(R1) RID 
3AT THIS * a IT_ IS ASSUMED rai” Rd HOLDS A DZV11 + ADDRESS. 
R1 snes? + STORE CSR IN CORE T 


3$: 


100$: 


4$: 


98$: 
99$: 


5$: 


6$: 


VECMAP: 


1$: 


(R 
9 (R2)+ 
#17470, (R2) 
(Re) +, , (R3)¢ 
#1, (R2) 
DZVNUM 
#20,D2VNUM 
1008 
#10,R1 
#164000,R1 
2$ 
DZVNUM 

% 


DZVNUM,R1 
o} SANE TY 


98$ 
SAVACTV 
4$ 


peceg SBASE 
NT0,$COW2 


a. wh 
SAVACTV, SDEVM 
VE CMAP 


72 
#3$,(SP) 


anASK 9822 

#02 .MAP,R2 

#300, RO 
#302.R 

Ri, tRo)+ 


N ° 

POP OVER VECTOR STORE AREA 

3SET THE DEFAULT 5 i SELECTION PARAMETER 
3SET THE DEFAULT PARAMETERS 

;COPY PARAMETERS INTO ETABLE DESCRIPTOR 
SET THE DEFAULT MODE OF OPERATION 
TERMINATE LIST 
[UPDATE DEVICE COUNTER 
ZARE MAX. NO. re iy an 

sYES DONT LOOK MORE. 
UPDATE CSR POINTER ADDRESS 
3BR IF MORE ADDRESS TO CHECK. 


sWERE ANY DZV11°S FOUND AT ALL? 
ERROR AUTO SIZER FOUND NO Dzvit' S IN THIS SYS. 


sCREATE A BIT MAP OF THE ACTIVE 
DEVICES IN THE SYSTEM 


nad 


sPOINT TO THE ADDRESS OF FIRST DEVICE 
INDICATE TO aie MODE IS BEING USED 


VECTOR NOW. 
3 Y OPR THAT NO DZV11°S FOUND. 
MAKE 5 i oe ZERO 


LE CONT. SW. 
RED BY NON-EXISTENT TIME-OUT 
RETURN TO MAINSTREAM 


SET IOT TRAP PRIORITY 

SET IOT TRAP VECTOR 

ZSET SOFTWARE POINTER 

3 FLOATING VECTORS START HERE. 


PC OF IOT INSTR. 
{START FILLING VECTOR AREA 


SEQ 0064 


N 5 
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NDZAA.P11 4:31 POWER DOWN AND UP ROUTINES SEQ 0065 
(2) my 012721 000004 MOV #4,(R1)¢ gWITH .#2; I0T 
672 022021 CMP (R5)+, (R1)¢ ‘ADD 2 TO RO #R1 
74 020127 001000 CMP R1,#1000 iHAS THE VECTOR AREA BEEN EXCEEDED? 


SNS 
S 


ALONSO 
So oS 
— 
Nw 
~N 
~“ 
Nm 


2s: ROR R4 BRING OUT A BIT 
C $ :BR IF ALL DONE 
1064 000000 MTPS #0 ;ZERO CPU PRIO 
0400406 000000 MOV #1114 ¢B1T5,9(R2) r ¢se SET TIE AND MAS SCAN 


7G 
112761 000017 000004 MOVB #17,4(R1) SET THE TCR BITS FOR ALL LINES 
ATTEMPT TO FORCE AN INTERRUPT 
005200 INC RO ;STALL 
001376 BNE -=2 R TIME TO INTERRUPT 
pietee 000300 000002 MOV #300,2(R2) 7NO INTERRUPT ASSUME 300 AND FIX DZV11 LATER 


ZINI 
062702 000012 3$: ADD #12,R2 3POP SOFTWARE POINTER 
000754 N 


sKEEP GOI 
011662 000002 4$: MOV sy eae GET VECTOR ADDRESS 
162762 000010 000002 SUB #10,2(R2 :POINT BACK TO THE CORRECT VECTOR 
042762 000007 000002 BIC #7 15ea80 SCLEAR J 
022626 POP2SP sPOP IOT JUNK OFF STACK 
012716 011750 MOV #3$, (SP) sSET FOR RETURN 


000002 

013737 001502 001170 5$: MOV DZVCO,$VECT1 COPY VECTOR OF FIRST DEVICE INTO ETABLE 
012737 004370 000020 MOV #.SCOPE,IOTVEC RESTORE THE SCOPE TRAP 

000207 RTS PC sALL DONE WITH *‘AUTO SIZING’ 


-= 
oO 
Ww 

NaS 

N& 
@ 
o 
ww 


oS aed ob ot a 8 tS es at a ot oS 
NN 


FRIIS ad ed re ed re a ed ed th td od od od ot 
SNS ONS SSS SSO 


SSSAVSTIAR AY 
@w 
Zz 


— 


So 


— —2> 
N= 
ms 


ee te et er a a a a a a ee ee ee ee ee a a a ae a ae ee ae we 


ARRAR RAR RAR AR AAR ARR ARR AAA AAA 
POPOPININYINDININDINNININININININI NNN NNPNyNnofpofonyngnys 


101771 BLOS 1$° R_ IF MORE TO FILL 
Aenee 001410 MOV SAVACTV,R4 ‘STORE hat 


Ce Ce ee ee ee 
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3 CNDZAA.P11 = 15=DEC=82 14:31 0ZV11 DEVICE "DIAGNOSTICS. COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0066 
709 
S708 peeeereneereeeteererteeese TEST 1 RRRRERAEREREEEREEREKEEREREEEEE 
(1) :*THIS TEST PROVES THE BUS REPLY RESPONSE 
(1) 3 *DUR ING A READ OR WRITE TO THE FOLLOWING ADDRESS: 
1) : me DZVCSR, DZVRBUF, DZVTCR, DZVMSR 
9} rH ° A, 2 NCEE SA Te LIS. Ss tS! ah 
(3) 012024 000004 t§T1: OPE 
(3) 012026 012737 000001 00 346 MOV #1,$TSTNM ;LOAD THE NUMBER OF THIS TEST 
(3) 012034 012737 Oiget4 00136 MOV #TST2,NEXT :POINT TO THE START OF THE NEXT TEST 
(1) 012042 012737 012202 000004 MOV #5$,4 SSET TRAP VECTOR 
(1) 012050 012737 000200 . 900006 MOV #MASK 6 :SET PRIORITY TO HIGH(MASK INTERRUPTS) 
(1) 012056 012737 012064 001364 MOV #1$,LOCK ZSET RETURN IF SWO9=11 
(1) 012064 013700 002010 1$: MOV DZVCSR,RO :SET ADDRESS TO TEST 
(1) 012070 011001 MOV (RO) -Ri SREAD THE 
(1) 012072 000240 NOP :WASTE TI 
(1) 012074 005010 CLR (RO) :WRITE THE ADDRESS 
(1) 012076 900240 NOP SWAST 
(1) 012100 012737 012106 001364 MOV #2$,LOCK ZSET RETURN ADDRESS FOR SW09 
(1) 012106 013700 002014 2s: MOV DZVRBUF ,RO 7SET ADDRESS TO TEST 
(1) 012112 011001 MOV (RO) ,R1 sREAD THE ADDRESS 
(1) 012114 000240 NOP : 
(1) 012116 005010 CLR (RO) :WRITE THE ADDRESS 
(1) 012120 000240 NOP [WASTE TI 
(1) 012122 oie 37 012130 001364 MOV #3$,LOCK sSET RETURN ADDRESS FOR Sw09 
(1) 012130 013700 002024 3$: MOV DZVTCR,RO SSET ADDRESS TO TEST 
(1) 91 134 11001 MOV (RO) RI sREAD THE ADDRESS 
(1) 0121 40 NOP 
(1) g1gi49 005010 CLR (RO) ;WRITE THE ADDRESS 
(1) 01214 340 NOP 
(1) 012144 012737 012152 001364 MOV #4$,LOCK :SET RETURN ADDRESS 
(1) O1gi32 700 002030 4$: MOV DZVMSR,RO :SET ADDRESS TO TEST 
(1) 012156 011001 MOV (RO) Ri SREAD FROM ADDRESS 
(1) 012160 000240 NOP 
(1) 012162 005010 CLR (RO) ZWRITE THE ADDRESS 
(1) 012164 240 NOP ; 
(1) 012166 O12 37 000006 000004 MOV 46,4 [SET TRAP CATCHER BACK TO NORMAL 
(1) 012176 005037 000006 CLR : 
(1) 012200 104400 ADVANCE : SCOPE THIS TEST 
(1) 012202 011601 5$: MOV (SP),R1 3SAVE PC OF 
(1) 012204 022626 POP2SP :POP TRAP ore 
(1) 012206 104001 ERROR 1 {NO BUS REPLY RESPONSE. 
(1) 012210 104401 SCOP1 ; SWO9= 1? 
(1) 012212 000111 JMP iR1) 
8711 seeeeereneerereeeerereees TEST 2 atantenentenereeeeeeenereeeeee 
aie [*THIS TEST PROVES THAT BIT Dc CLR’ 
871 [*CAN SE SET AND THAT IT WILL CLEAR 
8714 -*BY ITSELF 
8716 zit TEST 2 
(5) SRAAEKAARARERAAAAAAETAESEAAAAAEAARARAAAAARAREEERAEEAAEERARERERERAERE 
(4) 012214 000004 1812: SCOPE 
(2) 012216 012737 909902 00124 : MOV #2,$TSTNM ;LOAD THE NUMBER OF THIS TEST 
(2) 012824 012737 01286) 00 136 MOV #TST3,NEXT SPOINT TO THE START OF THE NEXT TEST 
8717 012232 013700 002010 MOV jzvCshe RO [SET POINTER 
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CNDZA=A MACY TT 0(1046) 15;DEC~82 14:36 PAGE 81-48 
CNDZAA.P11 «=: 15=DEC=82 14:3 DZV11 DEVICE DIAGNOSTICS. | COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0067 
| 8718 01 36 g12710 000020 MOV #DCLR, (RO) ZSET OCLR 
| 8719 01224 CLR RS sSET EXPECTED TO. 4 
| 8720 012244 $0003 CLR R3 :DUAL LOOP COUNTE 
| 8721 012246 011004 2$: MOV (RO) RG 71S OCLR CL LEAR 
| 872 012250 001403 BEQ 3 TIF YES 5 To org NEXT TEST 
8723 012252 105205 INCB OR sie hon cOuNT ks 
8726 012254 001374 BNE 38 S THE Une eNPInee? if NO, GO TEST BIT AGAIN 
8725 012256 104002 ERROR seOeLR FAILED TO CLEAR 
8726 012260 3$: 
8727 peeeerereneeeeeeeereenter TEST 3 eaeeceaneeaanresenereerereaete 
(1) SeTEST TO VERIFY THAT THE R/W BITS OF THE 
(1) S*DZ2VCSR REGISTER CAN BE SET. THEN VERIFY THAT 
(1) S*THESE BITS CAN BE CLEARED. AND FINALLY, VERIFY 
(1) S*THAT AFTER BEING SET AGAIN, THEY CAN BE 
(1) S*CLEARED BY A ‘DEVICE CLEAR'’. 
(1) [*THE BITS TESTED ARE: MAINT, MSENAB, SILOEN, 
(1) *RIE, AND TIE. 
(3) pr TEST 3 
(6) ee A... Eales ate cde! A ee acres se 
| (3) 012260 000004 TST3: SCOPE 
(3) 012262 012737 000003 00124 MOV #3, STSTNM ZLOAD THE NUMBER OF THIS TEST 
(3) 012270 012737 012436 00136 MOV #TST4 NEXT ‘POINT TO THE START OF THE NEXT TEST 
(1) 012276 013700 002010 MOV DZVCSR,RO [GET BASE ADDRES 
(1) 012302 012703 012416 MOV #5$,R3 :SET R3 TO TOP OF TABLE 
(1) 012306 011305 1$: MOV (R35 RS :SET BIT 
(1) 012310 012737 012316 001364 MOV #11$,L0CK SSETUP FOR TIGHT SCOPE LOOP 
(1) 012316 910510 11$: MOV R5, (RO) SET BIT IN 
(1) 012320 011004 MOV 6) .R4 TREAD THE BT FROM DEVICE 
(1) 012322 020504 CMP wRG [WAS BIT 
(1) 012324 001401 BEQ $ :BR IF ves. 
(1) 012326 104002 ERROR 2 '*BIT R/W FAILURE 
(1) 012330 104401 2s: SCOP1 1S SWITCH 9 SET? 
(1) 012332 012737 012340 001364 MOV #12$,LOCK SET FOR NEXT TIGHT SCOPE LOOP 
(1) 012340 040510 12$: BIC R5, (RO) :CLEAR THE BIT. 
(1) 012342 011004 MOV (RO) RS TREAD DEVIC 
(1) 012344 001403 BEQ 3$ :BR IF BITS WERE CLEARED. 
(1) 012346 005005 CLR RS SCLEAR FOR ERROR PRINTOUT 
(1) 012350 104002 ERROR 2 :*BIT FAILED TO CLEAR 
(1) 012352 011305 MOV (R3) RS SRESTORE THE BIT. 
(1) 012354 104401 3$: SCOP1 2 S609 SET? 
(1) 012356 012737 012364 001364 MOV #13$,LOCK :SET UP FOR NEXT TIGHT SCOPE 
(1) 012364 010510 13$: MOV RS, (RO) :SET THE BIT AGAIN 
(1) 012366 104413 DEVICE.CLR’ + ISSUE DEVICE CLEAR 
(1) 012370 011004 MOV (RO) ,R4 SREAD THE BIT. 
(1) 012372 001403 BEQ 4$ ‘BR IF BIT CLEARED By INIT (DEVICE CLEAR) 
(1) 012374 005005 RS ;SET EXPECTED T 
(1) 012376 104002 ERROR 2 *BIT NOT CLEARED BY DEVICE CLEAR 
(1) 012400 011305 MOV (R3),R5 ‘RESTORE BIT AGAIN 
(1) 012402 104401 4$: SCOP1 isu wO9 SET? 
(1) 012404 062703 000002 ADD #2,R3 R 
(1) 012610 005713 TST (R$) [1S THIS THE END OF TABLE? 
(1) 012412 001407 BEQ 6$ SIF YES GET OUT 
(1) 012414 000734 BR 1$ 3 OTHERWISE TEST NEXT BIT 
(1) 012416 000010 5$: #MAINT ‘CSR BIT: INTERNAL MAINTENANCE 
(1) 012420 000040 #MSENAB ?CSR BIT: MASTER SCAN ENABLE 
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‘CNDZAA.P11 DZV11 DEVICE DIAGNOSTICS. | COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0068 
(1) 012422 010000 #SILOEN :CSR BIT: SILO ENABLE 
(1) 012424 000100 #RIE :CSR BIT: RECEIVER INTER. ENABLE 
(1) 012426 040000 atic 7CSR BIT: TRANS. INTER. ENABLE 
(1) 012430 000000 #0 SEND OF TAB 
(1) 012432 005037 001364 68: CLR LOCK :ZERO LOCK INDICATOR 
8728 peteeeeeeeeeeeeeceeeeeens TEST 4 seteeeaeeeearerereeaerereerere 
(1) ;*THIS TESTS THAT ALL OF alte TCR BITS 
(1) 7*CAN BE: SET, CLEARED, AND CLEARED BY A DEVICE CLEAR. 
(1) seTHIS TEST ALSO DETERMINES IF THE DTR BITS CAN 
(1) resis E SET, CLEARED, AND CLEARED BY A RESET. 
-3® 
(6) +: ATR ee ea ER aE 
(3) 000004 TST4: SCOPE 
(3) 012737 000004 MOV #4, $TSTNM :LOAD THE NUMBER OF THIS TEST 
(3) 012737 012642 MOV #TST9 NEXT [POINT TO THE START OF THE NEXT TEST 
(1) 013700 002024 MOV bzvt CR,RO :SeT T DEVICE AD ADDR ES S 
(1) 012460 012703 012546 MOV $,R 9 Top OF TABLE 
(1) 012464 012737 012474 1$: MOV Ais Lock csert LOCK FOR’ S09 SCOPE LOOP 
(1) 012472 011305 MOV (R5) 5h? SET EXPECTED R ULTS 
(1) 012474 010510 11$: MOV [SET THE BIT 
(1) 012476 011004 MOV a RO). SREAD THE Bit FROM THE DEVICE 
(1) 012500 020504 CMP _ 3D1D THE BIT SET? 
(1) 012502 001401 BEQ R. F YES 
(1) 012504 104002 ERROR teBIT FAILED TO SET. 
(1) 012506 104401 2s: SCOP1 :Sw09 $ 
(1) 012510 012737 012516 MOV #3$,LOCK SET FoR NEXT TIGHT SCOPE LOOP 
(1) 9 2516 040510 38: BIC R5, (RO) SCLEAR BIT 
(1) 012520 011004 MOV (0), R4 SREAD THe REGISTER 
(1) 012522 001403 BEQ <BR IF Y 
(1) 012524 005005 CLR aS :SET EXPECTE TO 0 
(1) 012526 104002 ERROR 2 3* PORT ey OWT CLEAR 
(1) 012530 011305 V (R3),R5 EREST 
(1) 012532 104401 4$: SCOP1 th SETS 
(1) 0125346 062703 000002 ADD #2,R3 [POP POINTER TO NEXT TABLE ENTRY 
(1) 012540 00571 TST (R3) SEND OF TABLE? 
(1) 012542 001412 BEQ 6$ sI1F YES JUMP OVER TABLE 
(1) 012544 000747 BR 1$ SSTART TESTING NEXT BIT 
(1) 012546 000001 5$: #TCRO :TCR BIT FOR LINE 0 
(1) 012550 000002 #TCRI ‘TCR BIT FOR LINE 1 
(1) 012552 000004 #TCR2 :TCR BIT FOR LINE 2 
(1) 012554 000010 ATCR3 :TCR BIT FOR LINE 
(1) 012556 000400 #DTRO :DTR BIT FOR LINE 0 
(1) 012560 001000 #0TR1 ‘DTR BIT FOR LINE 1 
(1) 012562 002000 #DTR :DTR BIT FOR LINE 2 
(1) 012564 004000 #DTR ‘DTR BIT FOR LINE 
(1) 012566 000000 #0 SEND OF TABLE 
(1) 012570 005037 001364 6$: CLR Lock ZCLEAR TIGHT SCOPE LOOP INDIC. 
(1) 012576 012710 177777 mov sSET ALL BITS IN rch OREGISTER 
(1) 012 012705 007400 #o0?400, RS [SET EXPECTED 
(1) 012 104413 DEVICE.CL :SET DCLR BIT IN CSR 
(1) 0 011004 MOV TREAD REGISTER 
(1) 0 020504 CMP OF [TCR BITS CLEARED? 
(1) 0 001401 BEQ 7$ :1F YES BRANCH 
(1) 0 104002 ERROR 2 [TCR BITS NOT CLEARED! 
(1) 0 00500 7$: CLR 5 :SET EXPECTED TO ZERO 
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/CNDZAA.P11 15=DEC-82 14:31 DZV11 DEVICE DIAGNOSTICS. COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0069 
(1) 012620 o0ee7 000000 8$: INC #0 DELAY FOR ACT 
(1) 012624 001375 BNE 8$ 3 
(1) 01 $68 012710 177777 MOV #-1, (RO) 3SET ry POSSIBLE BITS 
(1) 012632 000005 RESET 
(1) 0126 011004 MOV (RO) ,R4 :DID REGISTER aed 
(1) 0126 001401 BEQ 9$ F YES GET 
| (1) 012640 104002 ERROR 2 TREGISTER DID NOT CLEAR! 
i (1) 012642 9$: 
| 8729 ares? TEST Weaities Tat TEST § xeeeneennenerareneeeereareeeet 
| (1) 3*THIS TEST gg THA 
(1) s*BITS "'RDONE,T BITS. Yt 8, 
i ; *AND SILOAL” A RE READ D ONLY AND THAT TRDY IS 
$1 : ZERO UNTIL A AINE IS SELECTED AND MSENAB IS SET. 
| 
' 3) gre test's 
(6) i jasetverstvecussusveauaveauensanecuenecueneencananecucnecncnceys 
| {2 012642 000004 TSTS: SCOPE 
(3) 12644 012737 000005 001246 MOV #5, STSTNM ;LOAD THE NUMBER OF THIS TEST 
(3) 012652 012737 012744 001362 MOV #TST6, NEXT sPOINT TO THE START OF THE NEXT TEST 
(1) 012660 013700 002010 MOV DZVCSR.RO 7SET ADDRESS TO RO 
(1) 012664 104413 eee ;D0 A peuiee CLEAR 
(1) 012666 005005 CLR RS sSET EXPECTED TO 0 
ae 012670 012710 121600 MOV AROONE +TROVSBLTOVBITBSSILOAL (RO 
(1) 012674 011004 MOV (RO) ,R4 sREAD BACK " BITS 
(1) 012676 001401 BEQ $ 3BR if NONE ARE SET. 
(1) 815700 106008 ERROR :*BITS WERE SET. 
(1) 012702 012705 100040 2$: MOV #TRDY*+MSENAB,RS SSET EXPECTED BIT 
(1) 012706 052777 000017 167110 BIS #17,aDZVTCR SET TCR BITS FOR ALL LINES 
(1) 012714 052710 000040 BIS WMSENAB,(RO) = $SET SCAN ENABLE 
(1) 012720 005002 CLR Re SET COUNTER TO ZERO 
(1) 012722 011004 3$: MOV (RO) ,R4 sREAD THE REGISTER 
(1) 012724 042704 001400 BIC #B1T9'BITB,R4 sMASK OUT LINE NO. 
(1) 012730 020504 CMP R5,R4 ;BIT SET? 
(1) 012732 001404 BEQ 3BR IF YES 
(1) 012734 104414 DELAY sSTALL TIME 
(1) 012736 005202 INC R2 oor COUNTER 
(1) 012740 001370 BNE 3$ 3:BR IF COUNTER ~ DONE. 
(1) 012742 104002 ERROR 2 s*TRDY NOT SET 
(1) 012744 4$: 
8730 eres Ona? Weetries Prat TEST 6 seeeeeeneerareneceneereneerene 
8731 T*THIS TEST VERIFIES THAT: 
8732 :eTIE, SILOEN. RIE, MSENAB, AND MAINT ARE THE 
8733 S*ONLY R BITS iN THE DZVCSR AND THAT 
8734 SETTING 4B CLR IN THE CSR WILL CLEAR THESE BITS. 
8736 git TEST 6 
(5) s RR RARHAAEHeHEHHHHHKHAHAHEEEHAAHKAAAAHAKEKEReeH Ree teReeReeeere 
(4) 012744 000004 TST6: SCOPE 
(2) 012746 012737 000006 001246 MOV #6, S$TSTNM ;LOAD THE NUMBER OF THIS TEST 
ce) 012754 012737 013074 001362 MOV atst7, NEXT sPOINT TO THE START OF THE NEXT TEST 
8737 0127 104413 DEVICF.CLR SET DCLR IN CSR 
8738 O15 76e 013700 9020 9 MOV DZVCSR,RO sSET UP FOR ERROR MESSAGE 
8739 012770 012710 17775 MOV #*C<DCLR>, (RO) :TRY TO SET ALL BITS EXCEPT DCLR 
8740 012774 012705 050150 MOV @TIE!STLOEN! RIE! MSENAB! MAINT,RS ;MAKE EXPECTED 


a 
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' 8741 013000 011004 MOV (RO) RS s ACTUAL 
8742 013002 020405 CMP RRS [CMP EXPECTED VS ACTUAL 
, 87435 0130046 001401 BEQ 1$ 3YES 
| 8744 013006 104002 ERROR 2 3*NO 
, 8745 013010 105010 18: CLRB (RO) scl LOW BYTE OF CSR 
| 8746 013012 105005 CLRB RS SCLEAR LOW BYTE OF EXPECTED DATA 
8747 013014 011004 MOV (RO) ,R4 sREAD CS 
8748 Oi sai8 020405 CMP R4,R5 DOES CSR COMPARE WITH EXPECTED? 
8749 013020 001401 BEQ 3$ BRAN CH IF YES 
8750 013022 104002 ERROR 2 Z1F 7 PRINT ERROR 
8751 013024 012710 177757 3$: MOV #*C<DCLR>,(RO) ;SET ALL CSR BITS 2? aes 
8752 0130 105077 166756 CLRB @HDZVCSR :CL EAR wee Ab E OF 
8753 013034 012705 000150 MOV #RIE!MSENAB!MAINT, RS 1 EXPECTED IN RS 
8754 013040 011004 MOV (RO) ,R4 3R csk° REGIST 
8755 013042 020405 CMP R4R5 00 es ACTUAL SEXPECTED 
8756 013044 001401 BEQ 43° sIF YES eeint INUE 
8757 013046 104002 ERROR 2 IF NO PRINT ERROR 
8758 013050 012710 177757 4$: MOV #*C<DCLR>, (RO) 3SET ALL POSSIBLE CSR BITS 
8759 013054 005005 CLR RS sSET RS TO EXPECTED RESULTS 
8760 013056 052710 000020 BIS #DCLR, (RO) [DEVICE MASTER RESET 
8761 013062 000240 NOP 
8762 01 011004 MOV (RO) RS ACTUAL 
8763 013066 020405 CMP R4,R5 3CMP ACTUAL VS EXPECTED 
8764 013070 001401 BEQ YES 
8765 013072 104002 ERROR 2 3*NO 
8766 013074 2$: 
8767 pteeeeeeeeeereeeereeerere TEST 7 ReeeeeekeeeeeeeeeeeRettereere 
(1) S*THIS TEST PERFORMS a TESTING AND 
(1) :*TESTING OF READ ONLY REGISTER DZVRBUF 
th re es} aM TESTING OF WRITE ONLY REGISTER DZVLPR 
*3* 
(6) oR ER TEN a eee 
oe 013074 009004 TST7: SCOPE 
(3) 013076 012737 000007 001246 MOV #7, STSTNM ;LOAD THE NUMBER OF THIS TEST 
(3) 013104 012737 013160 001362 MOV #TSTIO,NEXT sPOINT TO THE START OF THE NEXT TEST 
(1) 013112 104413 DEVICE.CLR sCLEAR DZV11 
(1) 013114 013700 002014 MOV DZVRBUF ,RO #33 _- FOR ERROR MESSAGE 
(1) 013120 011005 MOV RO),RS RESENT CONTENTS 
(1) 013122 042705 106000 BIC aDvALio:e1111:81T10, ns sCLEAR SLL EGS BITS 
(1) 013126 012777 177777 166664 MOV #-1,aDZVLPR sT RY T O' WRIT E ALL 
(1) 013134 011004 MOV (ROS ,R4 ACTUAL 
(1) 013136 020405 CMP R4 RS [CMP ACTUAL VS EXPECTED 
(1) 013140 001401 BEQ 1$ cIF YES,GO CONTINUE PROCESSING 
(1) 013142 104002 ERROR 2 *ERROR- BIT PATTERN NOT CORRECT 
(1) 013144 005077 166650 1$: CLR @DZVLPR ;TRY TO iRite ALL ZEROES 
(1) 013150 011004 MOV (RO) ,R4 7. REGISTER 
(1) 013152 020405 C R4R5 ACTUAL VS. EXPECTED 
(1) 013154 001401 BEQ 2 < GRANCH IF EQUAL 
34 oisiee 104002 $ ERROR 2 VALUES DID NOT COMPARE 
8768 peeeeeererereeeeeeererere TEST 10 senarererereeeeerererereneeere 
(1) S*THIS TEST PERFORMS RESET TESTING = 
(1) S*TESTING OF READ ONLY REGISTER DZVM 
th res} ane TESTING OF WRITE ONLY REGISTER? DZvTDR 
o3* 


cc + Oi ee 
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(6) 
| (32 013160 000004 
(3) 013162 012737 000010 001246 
| ¢3) BIS190 O1S787 Oiacee OOTSES 
| 1) 013176 «104413 
| (1) 013200 013700 002030 
| (1) 013206 011005 
G1) 013206 042708 170360 
(1) 013212 112777 177777 166614 
(1) 013220 011004 
(1) 013222 020405 
(1) 013226 001401 
(1) 013226 104002 
| 1) 013230 005077 166600 
(1) 013234 011004 
| 1) 013236 020605 
(1) 013240 001401 
(1) 013242 104002 
(1) 013244 
8769 
8770 
8771 
8772 
8773 
8774 
8775 
877 
877 
8778 
8780 
8781 
(5) 
(4) 013244 000004 
(2) 013246 012737 000011 001246 
(2) 013254 012737 013440 001362 
8782 013262 005737 001372 
8783 013266 001001 
8784 013270 104400 
8785 013272 012737 013362 001364 
8786 913300 104413 
8787 013302 013700 002030 
8788 013306 005003 
8789 013310 012702 000001 
8790 013314 130237 001366 
8791 013320 001003 
8792 013322 005203 
8793 013324 104420 
8794 013326 000772 
8795 013330 010204 
879 013332 105737 001372 
8797 013556 100406 
8798 013340 032703 000001 
8799 013344 001402 
8800 013346 006204 


i110 


1$: 


2$: 


st 


SCOP 
OV #10, $TSTNM 
#TSTVT NEXT 
DEVICE. CLR 
DZVMSR,RO 
MOV (RO) R 
BIC #170360,R5 
MOVB #-1,aDZVTOR 
MOV ROS RS 
CMP R4,RS 
EQ 1$ 
ERROR 
Vv 


CMP Roars 
BEQ 2$ 
ERROR 2 


PS eAAeeeKeKeeeeeeeeeeeeeee 


COPYRIGHT 1982 DIGITAL EQUIP. CORP. 


LOAD THE NUMBER OF THIS TEST 
sPOINT Dat START OF THE NEXT TEST 


1 
; R ERROR MESSAGE 
3 COPY PRESENT ors 
Then ILLEGAL BITS 

Y TO WRITE ALL 1°S 


At UAL 
3CMP ACTUAL VS EXPECTED 

cIF YES,GO CONTINUE PROCESSING 
*ERROR- men NOT CORRECT 


2 
‘CLR @DZVTOR ;TRY TO uRITE ALL ZEROES 
MO (RO) ,R4 


sREAD REGISTER 
3CMP ACTUAL rs EXPECTED 
BRANCH IF 


sVALUES DID NOT COMPARE 


TEST 11 eeerenenaraerenerenareeerarenee 


"VERIFY THAT SETTING a1. FOR A LINE WILL 
D ‘'RING’* FOR: 


3*BRING UP "'CO’ 
THE SAME LINE IF 


se IN EXTERNAL MODE 
z*THE STAGGERED LINE vhs FOLLOWS: MODE . 


s*LINES ARE STAGGERED A 
s*LINEO WITH LINE1; Lines a oy 
:*THIS IS ONLY 


uS5.0 gor H329 


3*I1S CONNECTED ON THE “DZv. UNDER T 


TEST 11 


SRAAAAAEAEAAAAAEAAAAEHAEKEEAEAAAAAAAAEAAAAAAAAAAAARAAARAAAERAEAEREEE 


8$: 


1$: 
2s: 


3$: 


TéT11: 


SCOPE 

MOV #11,$TSTNM 
MOV atsti2, NEXT 
TST MODE 


BNE . 8$ 
ADVANCE 
MOV 


#10$,LOCK 
DEVICE.CLR 
MOV aerate 
CLR 
MOV #1,R2 
BITB R2,LINE 
BNE 3$ 
INC R3 
SHIFT 
BR 1$ 
MOV R2,R4 
TSTB DE 
BMI 
BIT #B81T0,R3 
BEQ 
ASR R4 


sLOAD THE NUMBER OF THIS TEST 
POINT TO THE START OF THE + TEST 
sTEST 10 SEE IF TESTING WITH 


ONN 
IF NO, GO TO NEXT TEST 


iH FOR LINE # 
XTERNAL MODE? 
STAGGERED SETUP 
A 

T 


TNER 
EVEN COMPANION 


SEQ 0071 


——— + ee ne ee ne ee ee -- 
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|CNDZAA.P11 15=DEC-82 14:3 DZV11 DEVICE DIAGNOSTICS. COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0072 
8801 OI F829 000401 BR 5$ 3GO SETUP EXPECTED RESULTS 
8802 013352 006304 4$: ASL RG FIND ODD PARTNER 
8805 013354 010405 5$: MOV R4,R5 sLOAD RS FOR EXPECTED 
8804 013356 000305 SWAB R5 sPLACE IN UPPER BYTE 
8805 013360 150405 81S8 R4,RS 3SET FOR RING BITS 
8806 013362 150277 166440 10$: B1SB R2,@HDZVTCR sSET OTR BIT 
8807 013366 104414 DELAY sDELAY FOR CABLE LAG 
8808 013370 011004 MOV (RO) RS MOV E RESULTS OF MSR REGISTER TO R4 
8809 013372 020504 CMP RS RE ;RESULTS=EXPECTED? 
8810 013374 001401 BEQ gs IF Y YES CONTINUE 
8811 013376 104002 ERROR zI1F NOT PRINT ERROR RESULTS 
8812 013400 104401 6$: SCOP1 21S SWO9 SET? 
8813 013402 012737 013410 001364 MOV #11$,LOCK SET UP FOR . ay SCOPE 
8814 013410 140277 166412 118: B1CB R2,@HDZVTCR i CLEAR DTR BIT F oe UNDER TEST 
8815 013414 104414 DELAY DELAY — CABLE L 
8816 013416 011004 MOV (RO) ,R4 :LOAD SR SR REGISTER” 
8817 013420 001402 BEQ 7$ zI1F CO AND RING CLEA RED CONTINUE 
8818 013422 005005 CLR RS OTHERWISE SET EXPECTED FOR ERROR 
8819 013424 104002 ERROR 2 :PRIN TOUT 
8820 alerts 104401 7$: SCOP1 31S Swo9 SET? 
8821 0134 012737 013362 001364 MOV #10$,LOCK TRESET TIGHT SCOPE LOOP 
eas¢ 013436 000731 BR 2s sGET NEXT LINE 
4 peeeeeeeencerereeceeeeree TEST 12 eeeeneneeeececererterereerener 


3* THIS TEST ea — TROY IS SET WHEN A LINE 
s¢ J RX AND THAT THE LINE SPECI- 
‘* raf, IN BITS 8- DEvesR CORRESPOND 

' resi'1 O THE LINE SELECTED IN DZVTCR 


cutee tent cimedibianeaiiiinedeatainiesieastinieihattalinatadiemaiieeaaabes 


013440 000004 té112: SCOPE 
001246 MOV #12, $TSTNM THE NUMBER OF THIS TEST 
091374 CLR TINITIALI Ze FOR ERROR PRINTOUT 
INTER 


| 
r 

$093) 001362 MOV aTstts, NEXT CONT TO THE START OF THE NEXT TEST 

DEVICE.CL + ISSUE a DEVICE CLEAR" (RESET) 
MOV 28.10 [SET UP FOR TIGHT SCOPE LOOP 
002010 Z7VCSR,RO ‘SET PO 
10004 ' ‘ 
00000 MOV #1,R2 
: * : ECTED? 
E 6$ SIF NO TARTUP 
: R2,aDZVTCR SET 
000040 ; ; 
R4 :$ 
; BM! 4$ : § 
=DELA 
INC " COUNTER 
BNE ; sBR IF <>0! 
READY! 
: MOV 
R4,R 71S NE NUMBER 
E 38 TIF 
: SCOP1 


013514 001364 #2$ 1 0¢K 


wi 

So 
o-oo 
WW WG 
nNnuNN 


S 


FESERE 
S 
s 
Ss 
< 


eee 
kt tt at ss a os = = ss Ss Ss 2 SV WINN NOW 


er ee er ee ee er ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee es le ae 


01 
013456 

013460 

013466 

013472 01 

013476 012705 0 MOV #MSENAB! TRDY,.RS :START THE EXPECTED LINE NUMBER AT 0 
013502 012702 1 [USING R2 AS A BIT POINTER, POINT TO LINE 0 
013506 130237 001366 1$ BITB R2,LINE ug! Tats LINE SEL 

013512 001421 BEQ . SKIP THE S 

013514 050277 166304 2$ BIS THE GO BIT FOR THIS LINE 

013520 052710 BIS #MSENAB,(RO) | :START THE SCANNER 

013524 005004 CLR [SET FOR DELAY 

013526 005710 3$ TST (RO) [TX READY? 

013530 100404 BR IF YES 

013532 104414 DELAY [DELAY 

013534 005204 RG : COUNT 

013536 001373 - $ 

013540 104003 ERROR "TX NOT 

013542 011004 4$ (RO) RS SGET THE LINE POINTED TO BY THE SCANNER 
013544 020405 CMP oS [1S THE LI WHAT IT SHOULD BE? 
013546 001401 BEO YES,GO WORK ON THE NEXT LINE 

013550 104002 ERROR [*LINE NUMBER DID NOT MATCH TCR BIT 
013552 104401 5$ [1S SwO9 SET? 
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| (1) 013554 104413 DEVICE.CLR 3SET ecu IN CSR;SETUP FOR NEXT LINE 
(1) 813228 062705 000400 6$: ADD #400,R5 :POINT TO THE NEXT EXPECTED LI 
(1) ogee 104420 SHIFT ;POINT TO THE at phinté ARE ALL LINES TESTED? 
(1) 01 2$8 005237 001374 INC SAVLIN iat FOR ERROR PRINTOUT 
(1) 013570 000746 BR 1$ DO OTHE NEXT LINE 
8825 -eeeeeeeneeterereererrers S TEST "ss RRERAARARAAEAEERAEEAEAREREEEEE 
8826 s*TEST TO TRANSMIT ONE CHAR AND 
8827 S*RECEIVE ONE CHAR ON ONE. SINE 
8828 s*AT A TIME. THE CHAR IS ‘252° AND 
8829 T*ALL SELECTED LINES WILL BE TURNED ON . 
88 S*THIS IS THE FI 
8831 z*DATA IS CHECKED IN THE RECEIVER. 
88 s*USING SWITCH NINE WITH THIS TEST CREATES A TIGHT SCOPE LOOP 
tt rest 4 .. oe TRANSMITS A STEADY STREAM OF CHARACTERS. 
-s® 
(5) Rh EE NTE ne 
re 013572 000004 ST13: SCOPE 
(2) 013574 012737 000013 001246 MOV #13, STSTNM ;LOAD THE NUMBER OF THIS TEST 
(2) 013602 012737 014062 001362 MOV #TST14,NEXT sPOINT TO THE START OF THE NEXT TEST 
(1) 013610 012737 014044 001364 V #16$,LOCK iUSE THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECTED 
8836 013616 104417 DCLASM 3SET DCLR IN CSR AND SET MAINT MODE 
8837 013620 104421 LPRSET LOAD LPR REGISTER FOR ALL LINES 
8838 013622 005037 001374 CLR SAVLIN s INIT. FOR ERROR 
8839 013626 105037 001425 CLRB DONFLG SINIT FOR TCR BIT HANDLER 
8840 013632 012702 000001 MOV #1,R2 LINE POINTE 
8841 013636 012701 000252 MOV #252,R1 3 SAVE yore TO BE TRANSMITTED 
884 Ot sete 052777 p08 166140 BIS #MSENAB ,@DZVCSR i START SCANN 
8843 013650 050237 1 3$: BIT R2,LINE eg | LINE ? 
8844 013654 001467 BEQ 15$ NO SET UP NEXT LINE 
8845 013656 010277 166142 MOV Og -SOewTCR 3SET TCR BIT 
8846 013662 005005 5$: CLR R sSET RS FOR A DELAY LOOP 
8847 013664 105777 166120 TSTB aDZVCSR 31S REC DONE = 0 ? 
8848 013670 100001 BPL 6$ SIF YES, ALLOW TIME FOR TRDY TO SET 
8849 013672 104020 ERROR 20 s*REC pt SHOULD = 0 
8850 013674 005777 166110 6$: TST aDZVCSR STRDY SET? 
8851 013700 100404 BMI 7$ cI YES BRANCH 
8852 013702 104414 DELAY 31F NO THEN WAIT FOR IT 
8853 013704 005205 INC aa [DELAY LOOP 
8854 013706 001372 BNE $ ;BRANCH BACK AND TEST AGAIN 
8855 013710 104003 ERROR ore FAILED TO SET! 
8856 013712 105737 001425 7$: TSTB DONFLG HAVE WE ALREADY SENT CHARAC. 
8857 Ot 3738 001041 BNE 13$ TIF YES 3 9. CLEAR TCR BIT 
8858 0137. 105237 001425 INCB DONFLG TIF NOT INDICATE HAVING BEEN HERE 
8859 Ot 3760 110177 166104 R1,aDZVTOR LOAD CHARACTER 
8860 0137 013705 001374 MOV SAVLIN,RS : MAKE EXPECTED LINE # 
8861 013734 005737 001372 TST MODE 718 THIS TEST IN STAGGERED MODE? 
7 013740 100006 BPL 10$ 31F NUT, SKIP STAGGERED SETUP 
144 sWE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER 
(1) 013742 006205 ASR R5 3GET THE LAST BIT re. " CARRY BIT 
(1) 013744 103402 BCS 8&$ TIF IT IS SET, GO CLEAR IT 
(1) 013746 000261 SEC s1f IT IS CLEAR SET 1 
(1) 013750 000401 BR 3SKIP THE CLEARING 
(1) 013752 000241 8$: CLC sCLEAR THE CARRY BIT (INVERSION OF LINE PARITY) 


e — < - a —— 
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(1) 013754 006105 9$: ROL R5 3GET THE NEW BIT BACK sare RS 
eeee 013756 000305 10$: SWAB R5 sMOVE THE LINE NUMBER TO THE UPPER BYTE 
8863 013760 150105 81S8 R1,R5 ADD CHARACTER 
| 8864 013762 052705 100000 BIS #DVALID,RS TADD DATA VALID 
| 8865 013766 005003 CLR R 
| 2508 013770 105777 166014 118: TST8 — 31S RDONE SET? 
8867 013774 100404 BMI 12 z1F YES GO GET CHAR. 
| BB68 013776 104414 DELAY IF NOT THEN WAIT 
8869 014000 003603 INC R3 [DELAY LOOP 
8870 014002 001372 BNE 11$ “DELAY DONE? 
8871 014004 104004 ERROR 4&4 + *RDONE FAILED TO SET! 
| 8872 014006 017704 166002 128: MOV @DZVRBUF ,R4 SLOAD THE VALUE ACTUALLY RECEIVED 
8873 014012 020405 CMP R4,R5 3; COMPARE Ye vs aera’ stad ARE THEY THE SAME? 
8874 014014 001722 BEQ 5$ sIf YES DO THE NEXT LINE 
8875 014016 104006 ERROR g 7 *NO BATASCONTENTS DID NOT COMPARE 
8876 014020 000720 BR $ 60 BACK AND WAIT TO CLEAR TCR BIT 
8877 014022 104401 13$: SCOP1 3; CHECK My SEE id SWITCH NINE IS SET 
8878 014024 105037 001425 CLRB DONFLG SET UP FOR NEXT LINE 
8879 014030 005077 165770 CLR aDZVICR [CLEAR PREVIOUS TCR Pre 
8880 014034 005237 001374 15$: INC SAVLIN iSET LINE a TOR FOR NEXT LINE 
8881 014040 104420 SHIFT ALCULATE NEXT LINE 
Saat 014042 000702 BR 3$ ‘Get GET STARTED” 
43 ;TIGHT SCOPE LOOP FOR THIS TEST. LOOP TRANSMITS CHARACTERS ONLY 
8886 014044 005777 165740 16$: TST aDZVCSR 218 TRANSMITTER wi ie 
8887 014050 100375 BPL 16$ sIF NOT, WAIT FOR IT 
8888 014052 110177 165756 MOVB R1,aDZVTOR [LOAD THE CHARACTER 
8889 014056 104401 SCOP1 sLOOP AGIN IF SwWO9=1 
prt 014060 000760 BR 138 SOTHERWISE, GO PICK UP THE TEST NORMALLY 
8892 peeeeereceeeeeeeeceeceeee TEST 14 eeeceeneceneeeecerenecererrete 
8893 S*THIS TEST VERIFIES THAT EACH RECEIVING LINE CAN BE 
8894 :*DISABLED BY SETTING RCVON (BIT12 IN THE TPR REGISTER) 
8895 3*TO ZERO FOR EACH LINE. 
8896 s*THIS TEST ALSO VERIFIES THAT THE SILO CAN BE 
S505 re sf snr rte BY ISSUING A DEVICE MASTER CLEAR. 
*s 
(5) ll. oR IE | CLEA a aa 
(4) 014062 000004 TS114: SCOPE 
(2) 014064 012737 000014 oot ees MOV #14,STSTNM ;LOAD THE NUMBER OF THIS TEST 
(2) 014072 012737 014404 001362 MOV aTstis, NEXT ;POINT TO THE START or THE NEXT TEST 
8900 014100 105037 001425 CLRB DONFLG [CLEAR TEST CONTROL FLAG 
8901 014104 005037 001374 CLR SAVLIN sCLEAR LINE INDICATOR 
ast 014110 104417 DCLASM te ae A DEVICE MASTER CLEAR 
890 D SET MAINT BIT IF ~ me 
89046 014112 013701 001370 MOV PAR,R1 CAV VE DEFAULT PARAMETER 
8905 014116 042737 010000 001370 BIC #RCVON,PAR [DISABLE RECEIVER IN BEPAULT P 
8906 gieise Aonee! 100$: LPRSET [LOAD PARAMETERS IN LPR REGISTER’ 
8907 0141 g 010137 001370 MOV R1,PAR sRESTORE DEFAULT PARAMETERS 
8908 01413 912701 900252 MOV #25281 LOAD A CHARAC. INTO R1 
8909 bet 01 06 001366 MOV LM sCOPY AN IMAGE OF THE ACTIVE LINES 
8910 01414 O1087 165656 MOV R EORATCR 7SET TCR BITS FOR ALL ACTIVE LINES 
8911 014146 052777 000040 165634 BIS #msENAB, aDZVCSR sSET MASTER SCAN ENABLE 
8912 014154 005005 1$: CLR Zs INIT DELAY COUNTER 


K 6 
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| 8913 014156 005777 165626 2s: TST aDZVCSR 31S TRANS READY SET? 
| 8914 014162 100404 BMI 3$ ; BRANCH 
8915 014164 104414 DELAY sWAIT FOR TROY TO SET 
8916 014166 005205 INC RS zs INCREMENT DELAY COUNTER 
8917 014170 0013572 BNE $ sRETURN TO CHECK TRDY 
8918 014172 104003 ERROR sTRDY FAILED TO SET! 
8919 014174 117705 165612 3$: MOVB @HOZVCSR,RS sMOVE LINE NO. TO RS 
8920 014200 ETA 000001 MOV #71,R sINIT TCR POINTER 
8921 014204 042705 177774 BIC #*C<3>,R5 s ISOLATE LINE a. 
8922 014210 001403 BEQ 31$ 44 LINE _0 BRANCH 
8923 014212 106303 30$: ASLB R3 SHIFT R3 Bag TO NEXT LINE 
8924 014214 005305 DEC R5 :DECREMENT LINE 
8925 014216 001375 BNE 30S N _R5=0, R3 POINTS Lg at INE TCR 
8926 014220 030302 31$: BIT R3,R2 SHAS "CHARACTER BEEN SENT 
8927 014222 1007 BNE 6 ZBRANCH IF NO 
8928 014224 140377 165574 B1CB R3,aDZVTCR zIF YES THEN CLEAR TCR BIT 
8929 014230 001351 BNE 1$ 31F ALL_CHARAC. SENT DROP THROUGH 
at! 0142352 105737 001425 TSTB DONFLG $F NO once ACTIVE IS THIS SECOND 
8932 014236 001037 BNE 10$ zIF YES SKIP TO SECOND PART OF TEST 
8933 014240 000404 BR 5$ cIF FIRST TIME HERE = ZERO TCR BITS 
8934 014242 110177 165566 4$: MOVB R1,@DZVTOR Toys CHAR. INTO BUFFER 
8935 014246 040302 BIC R3,R2 s INDICATE CHARAC. SENT ON THIS LINE 
8936 014250 000741 BR GO BACK AND WAIT FOR TRDY TO SET 
8937 014252 005077 165546 5$: CLR aDZVTCR CLEAR OUT TCR BITS 
8938 014256 005005 CLR : INIT DELAY COUNTER 
8939 014260 105777 165524 6$: TSTB aDZVCSR 21S RECEIV. DONE SET? 
8940 Biases i454 BPL 7$ :1F NOT THEN WAIT Lh set IF IT WILL 
8941 014 $6 10402 ERROR 20 sREC DONE SHOULD 
og 014270 00040 BR 8$ GO FIND WHICH LINE "RECEIVED 
89435 014272 104414 7$: DELAY sSTALL FOR RECEIVER 
8944 014274 005205 INC R5 ZINCREMENT DELAY COUNTER 
8945 014276 001370 BNE 6$ IF NOT DONE GO RETEST REC DONE 
8946 014300 017704 165510 8$: MOV @DZVRBUF ,R4 sREAD REC. BUFFER 
8947 014304 100007 BPL 9$ 21S DVALID SET? 
8948 014306 000304 SWAB R4 z1F YES GET LINE NO. 
8949 014310 042704 177774 BIC #*C<3>,R4 ISOLATE LINE — 
8950 014314 010437 001374 MOV R4,SAVLIN SET UP LINE NO aS ERROR REPORT 
8951 014320 104017 ERROR 17 sDVALID ary NOT SET 
8952 014322 000766 BR 8$ 2GO CHECK FOR ANY oF HER CHAR. IN SILO 
89535 014324 105237 001425 9$: INCB DONFLG INDICATE THAT FIRST PART OF TEST IS DONE 
8954 014330 013701 001370 MOV PAR,R1 7SAVE DEFAULT LINE PARAM. 
8955 014334 73 00$ NOW GO RELOAD LPR REGISTER TO 
8956 2 TURN RECEIVERS ON 
8957 014336 005005 10$: CLR RS 3ZERO ta COUNTER 
8958 014340 104414 11$: DELAY WAIT FOR ALL CHARAC. TO BE RECEIVED 
8959 014342 005205 INC R5 S INCREASE DELAY C 
8960 014344 001375 BNE 11$ DELAY IF NOT FINISHED 
8961 014346 104413 DEVICE.CLR ISSUE A MASTER CLEAR 
8962 014350 000240 NOP 
8963 014352 000240 NOP 
8964 014354 105777 165430 TSTB aDZVCSR NOW IS RECEIV. DONE SET? 
8965 014360 100003 BPL sBRANCH IF NO 
8966 014362 005037 001374 CLR SAVLIN sCLEAR LINE NO FOR ERROR 75 
8967 014366 104020 ERROR 20 sREC. DONE SHOULD NOT BE SET! 
8968 014370 017704 165420 12$: MOV @DZVRBUF ,R4 sREAD REC. BUFFER 
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8969 014374 100003 BPL 13$ 31S DVALID SET? IT SHOULDN'T BE 
8970 014376 005037 001374 CLR SAVLIN sDEVICE. CLR DID NOT ZERO SILO 
8971 014402 104017 ERROR 17 :PRINT OUT THE ERROR.(LINE NO. IS IRRELEVANT) 
pad 014404 13$: 
8974 peeeeeeeereterereereeeees TEST 15 ulm Mme 
8975 * THIS TEST PROVES THAT THE TRANSMITTER TRANSMIT 
8976 #CHARACTERS | sfL AS MODE)AND THE ag thy RECEIVES. (FLAG MODE) 
8977 3*(ONE LINE AT A TIME BASED UPON VALID LINES) 
8978 res ts is THE TelRst TIME THAT ALL DATA IS CHECKED 
3% 
(5) + © REREEEEAEAAAEAEEEEEEEE AEE AEEAEEAEERAEEREREEEEEEEEERAEEEEEEREEEE 
28 014404 000004 TST15: SCOPE 
(2) 144 012737 000015 001246 MOV #15, $TSTNM ;LOAD THE NUMBER OF THIS TEST 
(2) 014414 012737 014674 001362 MOV #TST16,NEXT sPOINT TO THE START OF THE NEXT TEST 
(1) 014422 012737 014510 001364 MOV #5$,LOCK USE THIS ADDRESS IF A TIGHT SCOPE LOOP IS SELECTED 
8981 0144350 104417 DCLASM sSET DCLR AND SET MNTFLG 
8982 014432 104421 LPRSET [LOAD LPR REGISTER FOR ALL LINES 
8983 014434 005037 001374 CLR SAVLIN sINIT FOR FIRST LINE 
8984 014440 104422 BUF SET Hy BUFFER AREA 
8985 014442 105037 001425 CLRB DONFLG 3ZERO TCR BIT HANDLER FLAG 
8986 014446 012702 000001 MOV #1,R2 SLINE POINTER 
8987 014452 052777 000040 165330 Bis #MSENAB,@DZVCSR ;START SCANNER 
8988 014460 030237 001366 3$: BIT R2,LINE sVALID LINE ? 
8989 014464 001477 BEQ 15§ NO ET le NEXT LINE 
8990 014466 010277 165332 MOV R2,aDZVTCR SET 
8991 014472 013700 001374 MOV SAVLIN,RO ZADJUST Reiter POINTER 
8992 014476 300 ASL RO OFFSET 
8993 014500 105777 165304 4$: TST8 aDZVCSR 31S REC D =0? 
8994 014504 1 1 BPL 5$ TIF YES, ALLOW TIME FOR TRDY TO SET 
8995 014506 104020 ERROR 20 T*REC DONE SHOUL 
8996 014510 005005 5$: CLR RS sUSE RS AS TIMER WAITING FOR TRDY TO SET 
8997 014512 005777 165272 6$: TST aDZVCSR 71S THE TRANSMITTER READY? 
8998 014516 100404 BMI 7$ 31F SO, GO TRANSMIT A CHARACTER 
8999 014520 104414 DELAY suArT A LITTLE BIT 
9000 014522 005205 C RS 7. ° HE oN erty TIME EXCEEDED? 
9001 014524 001372 BNE 6$ 31F NOT, GO TRY AGAIN 
9002 014526 104003 ERROR 3 :sTRDY ‘faite TO SET! 
9003 014530 105737 001425 7$: TSTB DONFLG 3ALL TRANS .? 
9004 014534 001047 BNE 14$ zIF oe 60° ZERO TCR BIT 
9005 014536 116077 001426 165270 MOVB TDO(RO) ,ADZVTOR [LOAD CHARACTE 
9006 014544 013705 001374 MOV SAVLIN,RS sMAKE EXPECTED LINE # 
9007 014550 005737 001372 TST MODE 31S THIS TEST I's STAGGERED MODE? 
3% 014554 100006 BPL 10$ s1F NOT, SKIP STAGGERED SETUP 
38 ;WE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER 
(1) 014556 006205 ASR R5 3GET | LAST BIT INTO THE CARRY BIT 
(1) 014560 103402 BCS 8$ tI1F IT IS SET, GO CLEAR IT 
(1) 014562 000261 SEC sIF IT IS CLEAR SET IT HERE 
(1) 014564 000401 BR 9$ :SK KIP THE CLEARI 
(1) 014566 000241 8$: CLC :CLEA AR THE CARRY BIT (inven 10m OF LINE PARITY) 
(1) 914570 006105 9$: ROL R5 GET — NEW BIT BACK INTO R5 
9008 014572 000305 10$: SWAB R5 :MOVE T HE LINE NUMBER TO THE UPPER BYTE 
9009 014574 156005 001426 BISB TDOCRO) RS SADD CHARACTER 
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BIS #DVALID,RS zADD DATA VALID 


CLR 
11$:  TSTB aDdZVCSR :REC DONE? 
BMI 12$ TIF YES GO CHECK CHAR. 
DELAY SIF NOT WAIT FOR REC. 
INC R3 SDELAY LOOP TIME 
E 11$ :DELAY FINISHED? | 
ERROR 4 RDONE FAILED TO SET! 
12$: MOV @DZVRBUF ,R4 SL OAD THE VALUE MACTUALLY RECEIVED 
CMP R4,RS ‘COMPARE ACTUAL VS EX PECTED. ARE THEY THE SAME? 
BEQ 13$ SIF YES, GO DO THE NEXT LINE 
ERROR 6 [*NO DATA/CONTENTS DID NOT COMPARE 
13$: SCOP [CHECK TO SEE IF SWITCH NINE IS SET 
INCB —- TDOCRO) ZINCREMENT BINARY PATTERN FOR THIS LINE 
E 4$ :GO "ROUND AGAIN FOR NEXT CHARACTER 
INCB  DONFLG SINDICATE ALL CHAR. SENT 
BR 4$ [BRANCH TO CLEAR TCR BIT 
14$: CLR aDZVTCR [CLEAR TCR REGISTER 
CLRB —s—dDONFLG ZINIT FOR NEXT LI 
15$: INC SAVLIN INC EXPECTED LINE 
SHIFT [SHIFT THE LINE POINTER. ARE WE ALL DONE? 
R 3$ SIF NO, GO AROUND AGAIN FOR NEXT LINE 


peeeeeeeeeeeeerereereeeenr TEST 16 teeeeeereneeeereeneererereenes 
zsTHIS TEST WILL PROVE THAT: 
) THE TRANSMITTER BREAK BIT’* WORKS 


) THE RECEIVER CAN FLAG “FRAMING ERRORS" 
i+ 3) THE RECEIVER CAN FLAG “PARITY ERRORS 
ve Tegp DULY ONE LINE AT A TIME WILL BE EXERCISED. 
c OMe, IE ILE a Cs EA 
TST16: SCOPE 
MOV = #16, STSTNM LOAD THE NUMBER OF THIS TEST 
MOV = #TST17,NEXT | :POINT TO THE START OF THE NEXT TEST 
MOV =: #5$,, LOCK 3SET FOR LOOP 
CLR — SAVLIN ZINIT LINE INDIC. FOR ERROR PRINTOUT 
MOV = #1, R2 LINE POINTER 
1$: BIT —R2LINE VALID LINE? 
Q $ Z1F NOT SET FOR NEXT LINE 
DCLASM SET DCLR IN CSR AND SET MNTFLG 
v CK UP PARAMETERS 


PAR ,R1 :PI 
BIS PODOPAR! PARITY, PAR ;FORCE ODD PARITY 
LPRSET ;LOAD LPR REGISTER 
MOV R1,PAR RESET PAR TO ORIGINAL VALUE 
BIS #MSENAB, @DZVCSR s START SCANNER 


MOV SAVLIN, RS MAKE EXPECTED DATA 
TST MODE IS THIS TEST IN STAGGERED MODE? 
BPL 4$ IF NOT, SKIP STAGGERED SETUP 


WE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER 


ASR R5 2GET THE LAST BIT INTO THE CARRY BIT 
BCS 2$ sIF IT IS SET, GO CLEAR IT 
SEC IF IT IS CLEAR SET IT HERE 


SEQ 0077 
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f: 
4$: 
5$: 
6$: 


7$: 


8$: 
9$: 


sk 


iét17: 
1$: 


4$: 


5$: 


TEST 1 


BR 3$ zSKIP THE CLEARING 
CLC 'CLEAR THE CARRY BIT CINVERSION OF LINE PARITY) 
ROL RS GET THE NEW BIT BACK INTO R5 
SWAB RS LINE NUMBER IN UPPER OBvTE 
BIS #DVALID! PARER! FRAERR Ks ADD EXPECTED 
CLR sINIT DELAY ACCUMULATOR 
MOVB R2 BHDZVTOR 3SET BREAK BIT 
TSTB = ADVE “RECEIVER DONE? 
BMI * ‘BRANCH IF YES 
DELAY [WAIT FOR REC ¢ DONE TO SET 
INC R3 SINC DELAY 
BNE 63 :DELAY FINISHED? 
ERROR 4 :*RDONE FAILED TO SET! 
MOV @DZVRBUF ,R4 SACTUAL 
CMP R4,RS [CMP ACTUAL VS EXPECTED. DO THEY MATCH? 
BEQ 8% TIF YES, 
ERROR 6 ‘*DATA/CONTENTS FAILED TO COMPARE 
CLRB  @HDZVTOR [CLEAR BREAK BITS 
SCOP1 LOOP? 
INC SAVLIN SINC L 
SHIFT SET Ret FON T LINE 
R 60 x ANDY TEST NEXT LINE 
jeeeeeeeeeeeeeeeereterere TEST “, RRERAAREAEAEEEREREEEEEREEEEEEREE 
:* THIS TEST VERIFIES THAT THE DEVICE DOES NOT INTERRUPT 
T*WHILE THE PROCESSOR STATUS DOES NOT ALLOW INTERRUPTS 
‘*BUT WILL INTERRUPT IF THE PROCESSOR STATUS 
i *ALLOWS INTERRUPTS. 
1 ETE NEN RAR ADT LN Ne ae 
SCOPE 
#17,S$TSTNM LOAD THE NUMBER OF THIS TEST 
MOV #TST20, NEXT ‘BOINT TO THE START OF THE NEXT TEST 
DCLASM ‘SET DCLR IN CSR AND SET MAINT BIT 
TIF NECESSARY (INTERNAL MODE 
LPRSET ‘SET UP LPR REGISTER 
CLR SAVLIN ZINIT LINE INDIC. FOR ERROR 
CLRB = DONFLG SINIT TCR BIT HANDLER FLAG 
MOVB LINE,aDZVTICR :SET VALID TCR BITS 
MTPS #MASK :SET CPU STATUS To DZV11 PRIO, 
MOV #MASK,@D2VRIS :SET RECEIVER STATUS 
MOV #MASK.@DZVTIS :SET TRANSMITTER STATUS 
MOV #6$,aDZVTIV :SET UP THE TRANSMITTER INTERRUPT VECTOR 
MOV #7$, aDZVRIV :SET Up THE RECEIVER INTERRUPT VECTOR 
MOV #MASK .@DZVRIS :SET T HE INTERRUPT VECTOR STATUS 
MOV #MASK,@DZVTIS | :SET TRANSM ITTER INTERRUPT PRIORITY 
BIS #TIE!HSENAB, adzvCSR ENABLE T HE DEVICE 
CLR sINIT DELAY COUNTER 
TST BB ZVCSR  TRDY orto 
BPL 5$ [IF NOT GO DO DELAY 
NOP SWAIT FOR INTERRUPT 
BR 8$ :GO CLEAR TIE BIT 
DELAY ‘DELAY ROUTINE CALL 
INC RS SINC DELAY COUNTER 


SEQ 0078 
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(1) 015236 001367 BNE 4$ sDELAY ppelenee 
(1) 015240 10400 ERROR 3 s*TRDY NOT SET! 
(1) Ol asee 00041 BR 8$ 260 CLEAR TIE 
(1) 015244 pesees 6$: POP2SP par THE INTERRUPT FROM THE STACK 
(1) 015246 0427 040000 164534 BIC #TIE,aDZVCSR DON'T LET ANY MORE INTERRUPTS OCCUR 
(1) 015254 105737 001425 TSTB DONFLG :PROCESSOR ALLOWING INTER? 
(1) 015260 001013 BNE 10$ TIF Y YES NO ERROR 
(1) 015262 104010 ERROR 10 31F NOT PRINT ERROR 
(1) 015264 000415 BR 9$ RETURN N TO THE NORMAL 
(1) 812598 104012: 7$: ERROR 12 ee Sha SHOULD NOT INTERRUPT 
(1) 01527 pesees POP2SP :POP OR FAKE RT 
(1) 015272 042777 040000 164510 8$: BIC #TIE,aDZVCSR RESET TRANSMITTER INTERRUPT ENABLE 
(1) 015300 105737 001425 TSTB DONFLG Hi ett ENABLED? 
(1) 015304 001403 BEQ 9$ iI NOT GET OUT 
(1) 015306 104007 ERROR 7 F YES TRANS FAILED TO INTER. 
4 AEE 106427 000000 10s: MTPS #CLEAR ‘ALLOW INTERRUPTS 
tS) 015314 012777 015420 164522 MOV #11$,aDZVTIV sSET UP THE TRANSMITTER INTERRUPT VECTOR 
(2) BEET 012777 015424 164510 MOV #12$,aDZVRIV 3SET UP THE RECEIVER permet VECTOR 
(2) 0153 012777 000200 164504 MOV ase Seietit :SET THE INTERRUPT VECTOR STATUS 
(2) 015336 012777 000200 164502 MOV #MASK ,aDZVT SET TRANSMITTER INTERRUPT PRIORITY 
(2) 015344 052777 000140 164436 BIS #RIE'MSENAB, tozvish pene THE DEVIC 
(1) 015352 113777 001426 164454 MOVB TDO,aDZVTOR SLOAD BUFFER WITH ANY CHAR. 
(1) 015360 005005 CLR RS zs INIT DELAY ACCUMULATOR 
(1) 015362 105777 164422 13$: TST8 aDZVCSR REC. DONE? 
(1) 015366 100003 BPL 14$ 3IF NOT DELAY 
(1) 015370 000240 NOP sWAIT FOR INTERRUPT 
(1) EEG tad NOP 
(1) 15374 04 BR 18$ 
(1) Ot 2778 104414 148: DELAY sDELAY FOR INTERRUPT 
(1) 15400 005205 INC R5 3; INCREMENT DELAY COUNTER 
(1) 015402 001367 BNE 13$ :DELAY FINISH 
(1) 015404 104004 ERROR 4 *NO RX DONE! CNOT SET) 
(1) 015406 105737 001425 18$: TST DONFLG :PROCESSOR ALLOWING INTERRUPTS? 
(1) 015412 001411 BEQ 15$ IF T DON'T 
(1) 015414 104011 ERROR 11 SRECEIVER FAILED TO INTERRUPT 
(1) 015416 000407 BR 15$ sCONTINUE TEST 
(1) 015420 104010 11$: ERROR 10 : TRANSMITTER SHOULD NOT INTER. 
(1) 015422 000404 BR 16$ CON TEST 
(1) 015424 105737 001425 12$: TSTB DONFLG : PROCESSOR ALLOWING INTERRUPTS? 
(1) 015430 001001 BNE 16$ z1F YES DON'T PRINT ERR 
(1) 015432 104012 ERROR 12 : #RECEIVER SHOULD NOT INTERRUPT 
(1) 015434 0226 $ 198: POP2SP POP FOR FAKE RTI 
(1) 015436 0427 040100 164344 15$: BIC rots Hla adzvcsr° ; CLEAR oe 
(1) 015444 105737 001425 TSTB ——dDONFLG 3SECOND TIME THROUGH 
(1) 015450 001005 BNE 17$ 3IF ves apy: TEST 
(1) 015452 105237 001425 INCB DONFLG 31F NO INDICATE SECOND TEST PASS 
(1) 01545 9h 14 000000 MTPS #CLEAR 3ALLOW INTERRUPTS 
(1) 015462 0006355 BR sRESTART TEST 
(1) 813656 106427 000200 17$: MTPS #MASK 3sDON'T ALLOW INTERR 
ests 15470 104413 DEVICE.CLR sCLEAR DEVICE, LEAVE Pres 
34 | Seoutt TERT weal tea teat wea" 20 eeeeenecenaeeeeeneeereeenerete 
907 S*THIS TEST VERIFIES THAT THE RECEIVER WILL 
9078 ; INTERRUPT BEFORE THE TRANSMITTER EVEN 
9079 3*THOUGH THE TRANSMITTER WAS ENABLED 
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9080 :*FIRST. SET PS TO HIGH (MASK INTERRUPTS); 
9081 3*GET RDONE AND TRDY TO SET; 
9082 [*SET TX IE AND RX le: 
9083 “CLEAR PS AND EXPECT RX TO INTERRUPT FIRST 
9085 pre rest 
(5) Se ee ee eT 
(4) 015472 000004 1§120: SCOPE 
(2) 015474 012737 000020 001246 MOV #20, $TSTNM ;LOAD THE NUMBER OF THIS TEST 
(1) 015508 012737 004154 001362 MOV #SEOP NEXT *POINT TO THE END=OF “PASS HANDLER 
9086 015510 104417 DCLASM ?SET DCLR IN CSR 
9087 015512 104421 LPRSET ;LOAD PAR REGISTER FOR At LINES 
9088 015514 005037 001374 CLR SAVLIN SINIT. ERROR LI ‘ 
9089 015520 012777 015730 164312 MOV #8$,aD2VRIV SSETUP INTERRUPT STUFF 
9090 015526 012777 000200 164306 MOV WMASK,aDZVRIS; 
9091 015534 012777 016016 164302 MOV #128, a0zVTIV ; 
9092 015542 012777 000200 164276 MOV MMASK,aDZVTIS 
9093 015550 032777 000040 164232 BIS #MSENAB, aDZVCSR 
9094 015556 012702 000001 MOV #1, ZLINE POINTER 
9095 015562 030237 001366 3$: BIT R2,LINE SVALID LINE ? 
909% 015566 001515 BEQ 4g SIF NOT GO TO NEXT LINE 
9097 015570 106427 000200 4$: MTPS 
9098 015574 110277 164224 MOVB Ro apzvrcr :SET TCR HH 
9099 015600 005777 164210 TST aD2VRBU SVALID DAT 
100 015604 100001 BPL +4 IT BETTER NO T BE SET 
9101 015606 104017 ERROR 7 [DATA VALID SHOULD NOT BE SET 
9102 015610 105777 164174 S$: TSTB © aDZVCSR SRECEIVER DONE ? 
9103 015614 100001 BPL +4 
104 015616 104020 ERROR 20 ;RECEIVER DONE BIT SHOULD NOT BE SET 
9105 015620 005005 CLR RS 
9106 015622 005004 CLR RG 
9107 015624 005777 164160 99$: TST aDZVCSR :WAIT FOR TRDY 
9108 015630 100404 100$ [BR IF READY 
109 015632 104414 DELAY SSTALL TIME 
9110 015634 005204 INC RG : 
9111 015636 001372 E 998 
gi12 015640 104003 ERROR 3 sTRDY FAILED TO SET 
9113 015642 105077 164166 100$: CLRB  aDZVTOR SSEND A ZERO CHARACTER 
9114 015646 005004 CLR RG 
9115 015650 105777 164134 6$: TSTB  aDdZVCSR s1S RDONE SET? 
116 015654 100404 BMI 7$ 
9117 015656 104414 DELAY 
9118 015660 005204 RG 
9119 015662 001372 BNE 6s . 
9120 015664 104004 ERROR :*RDONE FAILED TO Ser! 
9121 015666 005777 164116 7$: TST Sp2vCsR : TRANS DONE BIT = 1 ? 
ize 015672 100401 +4 
9123 015674 104003 ERROR 5 S DONE FAILED TO SET 
9124 SNOW THAT BOTH seausnt és AND RECEIVER DONE BIT =1 
9125 *SET INTERRUPT ENABLES 
9126 015676 052777 040000 164104 BIS #TIE a2 
9127 015704 052777 000100 164076 BIS #RIE.aDZVCSR 
9128 015712 106427 000000 MIPS  &#CLEAR yALLOW THE INTERRUPTS 
9129 015716 000240 NOP 
9130 015720 000240 NOP 
913; 015722 104007 ERROR 7 :*TRANSMITTER FAILED TO INTERRUPT 
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| 
| 9132 015724 104011 ERROR 11 z #RECEIVER FAILED TO INTERRUPT 
| 93 015726 000435 BR 14$ :GET OUT 
| 9135 sRECEIVER INTERRUPT ROUTINE 
| 9136 015730 017704 164060 8$: MOV @DZVRBUF ,R4 s ACTUAL 
| 9137 015734 010403 MOV R4,R3 
| 9138 015736 000303 SWAB ORR 
9139 015740 042703 177770 BIC #°C<7>,R3 :STRIP JUNK 
9140 015744 005737 001372 TST MODE ‘1S THIS TEST IN STAGGERED MODE? 
(1) 015750 100006 BPL 11$ tIF NOT, SKIP STAGGERED SETUP 
(1) :WE MUST NOW INVERT THE LAST BIT OF THE LINE NUMBER 
(1) 015752 006203 ASR R3 GET THE LAST BIT INTO THE CARRY BIT 
(1) 015754 103402 BCS 9$ TIF IT IS SET, LEAR IT 
(1) 015756 000261 SEC SIF IT IS CLEAR SET IT HERE 
(1) 015760 000401 BR 10$ *SKIP THE CLEARING 
(1) 015762 000241 9$: CLC [CLEAR THE CARRY BIT CINVERS LON OF LINE PARITY) 
(1) 015764 006103 10$: ROL R3 'GET THE NEW BIT BACK INTO R3 
9141 015766 020337 001374 11$: CMP R3,SAVLIN :1S THIS A VALID LINE 
9142 015772 001401 BEQ +4 ze 
9143 015774 104015 ERROR 15 *t INVALID LINE 
9144 015776 042704 177400 BIC #°C<377>, R4 STRIP J JUNK 
9145 016002 120504 CMPBséRSR ‘DATA COMPARE ? 
9146 016004 001401 BEQ a YES 
9147 016006 104003 ERROR § DATA DOES NOT COMPARE 
9148 016010 040277 164010 BIC R2,aDZVTCR SCLEAR T 
9149 016014 000401 BR 13$ :GO0 GET OUT VF INTERRUPT MODE 
9150 TRANSMITTER INTERRUPT sic ROUTINE 
9151 016016 104011 12$: ERROR 11 THE RECEIVER INTERRUPT FAILED 
9152 [TO OVERRIDE THE TRANSMITTER 
9153 016020 022626 13$:  POP2SP ‘REMOVE THE INT ER RUPT VECTOR FROM THE STACK 
9154 916022 005237 001374 14$: INC SAVLIN SADJUST FOR NEXT LINE 
9155 016026 104420 SHIFT [GET THE NEXT POINTER. IF DONE, ADVANCE 


9156 016030 000137 015562 JMP 3$ ZOTHERWISE GO DO THE NEXT LINE 


SEQ 0082 
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30(104 
5=DEC- 


1 


CNDZA=A_MACY11 
/CNDZAA.P11 
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sERROR 4 


16072 016371 


16074 017111 
16076 017176 
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EM12 
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DTS 
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9214 
9215 016160 000000 0 
9216 016162 000000 0 
osiz 016164 000000 0 
9219 016166 016721 EM17 sERROR 17 
9220 016170 017077 DH3 
oss) 016172 017170 DT3 
9223 016174 016757 EM20 
9224 016176 017077 DH3 
9225 016200 017170 DTS 


A ee —_ 


aa 
| 
| 
i 
| 
| 
! 
| 
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SEQ 0083 
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(CNDZAA.P11—- 15=DEC=82 14:31 DZV11 DEVICE DIAGNOSTICS. | COPYRIGHT 1982 DIGITAL EQUIP. CORP. SEQ 0084 
9227 ZERROR MESSAGES 
9231 016202 047200 020117 052502 EM1: ‘ASCI2Z <200>/N0 BUS REPLY RESPONSE FROM DZV11 REGISTER/ 
9232 016255 200 042522 044507 EM2:  .ASCIZ <200>?REGISTER R/W FAILURE? 
9233 016303 200 051124 047101 EM3:  :ASCIZ <200>/TRANSMIT READY (TRDY) NOT SET/ 
9234 016342 051200 041505 046505 EMG: <.ASCIz <200>/RECEIVER DONE NOT SET/ 
9235 016371 300 040504 040524 EMS:  :ASCIZ <200>/DATA COMPARISON ERROR/ 
9236 016420 042200 053132 030461 EM6:  .ASCIZ <200>/DZV11 *RECEIVER BUFFER® ERROR/ 
9237 016457 200 0517124 047101 EM7:  .ASCIZ <200>/TRANSMITTER FAILED TO INT / 
9238 016520 052600 042516 050130 EM10:  .ASCIZ <200>/UNEXPECTED TRANSMITTER INTERRUPT/ 
9239 016562 051200 041505 044505 EM11:  <ASCIZ <200>/RECEIVER FAILED T 
9240 016620 052600 042516 050130 EM12:  .ASCIZ 3 >/UNEXPECTED RECEIVER INTERRUPT/ 
9241 016657 200 041501 044524 EM15: <ASCIZ <200>/ACTION DETECTED ON INVALID LINE./ 
9242 016721 200 040504 040524 EM17: .ASCIZ <200>/DATA VALID SHOULD NOT BE SET/ 
9243 016757 200 042522 042503 EM20: .ASCIZ <200>/RECEIVER DONE SHOULD NOT BE SET/ 
9245 017020 052200 040522 020120 DH1:  .ASCIZ <200>/TRAP PC D2ZV11 REG/ 
9246 017044 042600 050130 041505 DH2: .ASCIZ <200>/EXPECTED FOUND REGISTER/ 
9247 017077 200 044514 042516 DH3:  :ASCIZ <200>/LINE NO./ 
9048 017111 200 054105 042520 DH4:  .ASCIZ <200>/EXPECTED FOUND LINE/ 
9250 EVEN 
9254 “DATA TABLES FOR ERROR MESSAGES 
9255 017140 000002 pri: 3 
9256 017142 006 003 .BYTE 6,3 
9257 017144 001330 $REG1 
9258 017146 006 001 .BYTE 6,1 
9259 017150 001326 $REGO 
9261 017152 000003 pT2: 3 
9262 017154 006 004 .BYTE 6,4 
9263 017156 001340 $REGS 
9264 017160 006 001 .BYTE 6,1 
9265 017162 001336 $REG4 
9266 017164 006 001 .BYTE 6,1 
9267 017166 001326 $REGO 
9269 017170 000001 pT3: 1 
9270 01717 003 001 .BYTE 3,1 
9271 017174 001374 SAVLIN 
9273 017176 000003 p14: 3 
9274 017200 006 004 “BYTE 6,4 
9275 017202 001340 $REGS 
9276 0172 006 001 .BYTE 6,1 
9277 017206 001336 $REG4 
9278 017210 003 001 .BYTE 3,1 
9279 017212 001374 SAVLIN 
9288 ; TABLE OF DELAY TIMES FOR INDIVIDUAL BAUD RATES 
92 y 
9291 017214 002450 DLYTBL: 2450 :TIME FOR 50 BAUD 
9292 017216 001560 1560 [TIME FOR 75 BAUD 
9293 017220 001120 1120 [TIME FOR 110 BAUD 
9294 017222 000750 750 [TIME FOR 134 BAUD 
9295 017224 000660 660 [TIME FOR 150 BAUD 


| 
| 


rc- 


CNDZA=A MACY11 30(1046) 15=DEC-82 14:36 PAGE 83-1 
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92 017226 000330 330 
9297 017 000150 150 
9 017 000060 60 
344 017 000040 

9 017 000030 30 
9301 017240 000020 20 
9302 017242 000010 10 
9303 017244 000001 1 
9304 017246 000001 1 
9305 017250 000001 1 
9306 017252 000001 1 
9307 

9308 sDELA 
9309 sFOR 


Piles: Lith A tn Batti GE Soo 


DZV11 DEVICE DIAGNOSTICS. 


OMPUTED TO 
TO FUNCTI 
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sTIME FOR 300 BAUD 
sTIME FOR 14 BAU 
sTIME FOR 1200 BAU 
sTIME FOR 1800 BAU 
sTIME FOR 2000 BAUD 
sTIME FOR 2400 BAUD 
sTIME FOR 3600 BAUD 
sTIME FOR 4800 BAUD 
sTIME FOR 7200 BAUD 
sTIME FOR 9600 BAUD 
sTIME OF DELAY FOR 19200 BAUD 


L 


aor 


OW MAXIMUM TIME AT EACH BAUD RATE 
ORRECTLY ON A LSI11. 
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1 7 


: INIT $BASE AND SVECT1 AND TWEAK THE ““SGETPAR’ CALLING 
> SEQUENCE TO ACCEPT THE VALID FALCON RANGE. 


FALCINI: CHP apa IS $BASE VIRGIN, 2? 


E ; SkIP NEXT 

MOV #174060,$BASE : SET ENGINEERING DEFAULT 
1$: CMP svecr »WAVECTI 1s sgyett 11 IRGIN 

BNE : SKIP NEXT H NOT 

MOV $570, SVECTI : YES, SET ENGINEERING DEFAULT 
2s: MOV #3$ GETCSR+2 : SUBSTITUE CSR TEXT... 

MOV #174000, GETCSR+ 

MOV #177770, »GETCSR#10 z..eAND VALID RANGE. 

MOV #48 -GET WWeC+e ; SUBSTITUTE VECTOR TEXT... 

MOV ooo cet GETVEC+10 i pg AND VALID RANGE. 

RE TURN RETURN TO CALLER. 
3$: .ASCIZ <200>"1ST CSR ADDRESS (174000:177770) ° 
4$: .ASCIZ <200>"1ST VECTOR ADDRESS (000:370) ° 

EVEN 


>THE FOLLOWING .INIT CALL WAS ADDED TO INIT BRKVEC AND LKVEC 
POINT=. sSAVE POINTER 


.=100 
SCLKVEC ZLKVEC HANDLER 

300 : INTERRUPT HANDLER PRi 
-=160 SBRKVEC 

170000 007 START ADDRESS 
300 PRIORITY 

-=POINT “RESTORE POINTER 
SCLKVEC: TYPE .CLKMES 


L 
CLKMES: .ASCIZ <15><12>/LKVEC INTERRUPT = DISCONNECT LTC / 


pa TO INDICATE THE PROCESSOR IS FALCON 


72GPA 


73GPA 
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AVECT1= 000300 
AVECT2= 
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So 
® & 
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8784 


37 


SEQ 0087 


| AA.P11 
'BINWRD 006224 
BITO = 000001 
'BITOO = 000001 
'BITO1 = 000002 
81102 = 000004 
BITO3 = 000010 
BIT04 = 000020 
BITOS = 000040 
1BLTO6 = 000100 
'B1T07 = 000200 
'BITOB = 000400 
BITO9 = 001000 
BIT1 = 000002 
BIT10 = 002000 
BIT11 = 004000 
BIT12 = 010000 
BIT13 = 020000 
BIT14 = 040000 
BIT15 = 100000 
BIT = 000004 
BIT3 = 000010 
BIT4 = 000020 
BITS = 000040 
BIT6 = 000100 
BIT? = 000200 
BITB = 000400 
BIT9 = 001000 
BPTVEC= 000014 
BRKVEC= 000140 
BRKO = 000400 
BRK1 = 001000 
BRK2 = 002000 
BRKS = 004 


CNVRT = 10441 
CONVRT= 104411 
CORMAX 017460 
coo 6= 00 
CO? §©= 001000 
co2. = 002000 
cO3 = 004000 
cr = 000015 
CRLF = 000200 
cs 011326 
CYCLE 010464 
ATABP 716 
DATAHD 704 
DCLASM= 104417 
DCLR = 


DELAY = 104414 


CNDZA=A_MACY11_ 30(1046) 
CNDZ 


kK 7 
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EE EE RHEE 


SOSSSSeeeeeses 
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CROSS REFERENCE TABLE == USER SYMBOLS 


8798 


7 
8705 8767 


87054 
8984 


9074" 9128+ 


3 8981 9047 9074 9086 
8739 =. 8751 8758 8760 


1 
4 8815 8824 8852 8868 8915 8943 


8958 


8999 9014 


SEQ 0088 


9061 





po a 


|CNDZA=A MACYT1 30(1046) 


jCNDZAA.P11 
DEVADR 00574 
DEVICE= 10441 
DH1 017020 
DH 017044 
DH 017077 
DH4 017111 
ISPLA 001306 
DISPRE 000174 
DLYCNT 006320 
DLYTBL 017214 
DONFLG 001425 
DSWR = 177570 
DTRO = 000400 
DTR1 = 001000 
DTR2 = 002000 
DTRS = 004 
dT] 017140 
DT2 017152 
DT3 017170 
DT4 017176 
DVALID= 100000 
DZCRO 001500 
ZCR1_ =©001512 
DZCR10 001620 
DZCR11 001632 
DZCRI2 001644 
DZCR15 001656 
DZCR14 00167 
DZCR1S 00170. 
DZCR16 001714 
DZCR17 001726 
DZCR2 001524 
DZCRS 001536 
DZCR&4 001550 
DZCRS)§=©001562 
DZCR6 001574 
DZCR7 001606 
DZVACT 001406 
DZvVCSR 002010 
DzvcO §=—.: 001502 
DZVC1_ = 001514 
DZvC10 001622 
DZVC11 001634 
bevels 001646 
DZVC13 001660 
DZVC14 001672 
DZVC15 001704 
DZVC16 001716 
DZvC17 001730 
oe ves 001526 
DZVC 001540 
DZvC4 =: 001552 
DZvCS5 001564 
DZvC6 =: 001576 
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0.00 00 Co Co G0 Co Co Co Co 
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CROSS REFERENCE TABLE == USER SYMBOLS 


8727 8728)=—s_«8729"—ss«8737 = 8767 — «8768 


9192 9196 9200 9220 9224 


9188 
9184 92484 


8856  8858* 8878+ 8900* 8930 8953 


9193 
9010 


9197 
9056 


9201 9221 9225 


8727 
8987+ 
9127+ 


8729 
8993 


8738 
8997 


8824 
9012 


8786 


92474 


8985* 


92694 


8842+ 
9052* 


8824 


9003 


8847 
9059 


8961 


9025* 


8850 
9074 


SEQ 0089 


9074 


9028+ 9074* 


8866 8886 
9093* 9102 


ee I ee ary 
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CNDZAA.P11 15=DEC=82 14:3 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0090 
DZvC? = 001610 87034 
DZVLEV 011030 87054 
DZVLPR 002020 8703# 8705*  8767* 
DZVMSR 002050 87034  8705* 8710 8768 8787 
dZ 001414 8703#* 8705+ 
DZVRBU 002014 8703# 8705* 8710 8767 8872 8946 8968 9018 9065 9099 9136 
DZVRIS 002042 8703# 8705* 9074" 9090 
DZVRIV 2040 70 8705* 9074* 9089+ 
DZVTCR 002024 ory 14 Eh Bribe 8728 8729 8824* 8845" 8879 8910*  8928* 8937" 8990* 9027+ 
DZVTOR 002034 87034 8705* 8768+  8859* 8888+ 8934 9005* 9074+  9113* 
DZVTIS 002046 87034 8705* 9074+ 9092+ 
DZVTIV 002044 87034 8705* 9074*  9091* 
DZV.EN 001740 87034 705 
V.MA 001500 87034 8705 
EIGHT = 000030 87034 
EIGHTS= 000070 87034 
EMTVEC= 000030 87034#* 
016202 916 92314 
EM10 016520 9191 2384 
EM11 016562 9195 92394 
EM12 016620 9199 
EM15 016657 9211 92414 
EM17 016721 9219 92424 
EM2 016255 9167 92328 
EmM20 016757 9223 92434 
EMS 016303 9171 923 
EM4 016342 9175 92344 
EMS 016371 9179 92354 
EM6 016420 9183 92364 
EM? 016457 9187 92374 
ERRMSG 006672 8705#* 
ERRVEC= 000004 8703#  8705* 
T 007046 87054 
EVEPAR= 87034 
EXITER 76 87054 
FALCIN 017254 8703*  9396# 
FI = 87034 
= 0 87034 
FRMERR= 020000 87034 9056 
GETCSR= 002366 8703# 9402+ 9403*  9404* 
GETSWR= 007110 8703* 87054 
GETVEC= 002412 87034 9405*  9406*  9407* 
HALTS 006722 87054 
HDRFLG 001423 87034 
HDZVCS 002012 870 8705* 8752+ 8919 
HDZVLP 002022 8703# 8705+ 
HDZVMS 002032 87034 8705+ 
HDZVRB 002016 8703#  8705* 
HDZVTC 002026 87034 8705+  8806* 8814+ 
HDZVTD 002036 8703# 8705+ 9058* 9069 
HILIM 005744 8705#* 
T = 11 87034 8705 
INBUF 010360 8705#* 
INIFLG 001422 8703#* 8705+ 
INSTER= 104404 8703# 8705 





ert ws DS 6) 15=DEC-82 14:36 PAGE 


NDZAA.P11 


INSTR = 104403 
INSTR2 005544 
C= 0000 





IOTVEC= 000020 
KXTFLA 017532 
LF = 12 
LIMITS 005672 
LINE 1366 
LINEO 001504 
LINE? 001516 
LINE10 001624 
LINE11 001636 
LINE12 001650 
LINE13 001662 
LINE14 001674 
LINE1S 001706 
LINE16 001720 
LINE17 001732 
+e? 0015 
LINE 001542 
LINES 001554 
LINES 001566 
LINE6 001600 
LINE? 001612 
LKVEC = 000100 
LOBITS 005750 
LOCK 001364 
LOLIM 005742 
LPRSET= 104421 
LPO = 000000 
LP1 = 000001 
LP2 = 000002 
LP3 = 000003 
MAINT = 000010 
MANTO 001510 
MANT? 001522 
MANT10 001630 
MANT11 001642 
MANT12 001654 
MANT13 001666 
MANT14 001700 
MANT15 001712 
MANT16 001724 
MANT17 001736 
MANT2 001534 
MANTS 001546 
MANT4 001560 
MANTS 001572 
MANT6 001604 
MANT? 001616 
Sk = 000200 
MASTEK 007775 
MBADLN 010110 
MCSRX 007725 
MDATA 010422 
MEPASS 007543 
MERRPC 010055 


C-82 14:31 


8705* 
8837 


8705 
8705 


8705 
87054 
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8790 8824 8843 8909 8988 9045 
8710* 8727* 8728 8785*  88135*  8821* 
8906 8982 9050 9074 9087 

8727 8740 8753 

8710 9074* 9090 9092 9097* 


a i a se 


9074 


8824+ 


9095 


8835* 


8980+ 


9042+ 


SEQ 0091 
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MERRX 00775 7054 
MERR 00760 7054 
MERR 00765 8703 87054 
MLOCK 007676 870 87054 
MNEW 010000 870 8705# 
MNTFLG 001424 87034  8705* 

001372 8703# 8705* 8782 8796 8861 9007 9054 9140 
MPASSX 007741 87054 
MPFAIL 007500 87054 
MR 007567 8703 87054 
MSENAB= 000040 87034 8727 8729 8740 8753 8824 8842 8911 8987 9052 9074 9093 
MTITLE 001000 87034 
MTSTN 007763 87054 
MVECX 007733 8705 
NEXT 1362 03# 8705 8710* 8716*  8727* 8728+ 8729%  8736*  8767* 8768+  8781*  8824* 8835 
99% 8980" 9041" 9074" 9085+ 

NOLIST= settee YJ 8698 
ODDPAR= 000200 87034 9049 
ODTST = 170000 87 
ONESTO= 87034 
OVRRUN= 040000 87034 
PAR 001370 87034  8705* 8904 8905*  8907* 8954 9048 9049* 9051* 
PARAM = 104405 87034 8705 
PARAM? 005612 87054 
PARER = 7 9056 
PARERR 005666 87054 
PARITY= 0001 87034 9049 

ARMD = 104415 {itd 
PARQ 001506 7034 

PAR1 001520 87034 

PARIO 001626 87034 

PAR11 001640 87034 

PAR 001652 87034 

PAR1 Bote? 87034 
PAR14 001676 87034 
PAR1S 001710 87034 

PAR16 oo 87034 

PARI? 0017 87034 

PAR2 001532 87034 
PARS 001544 87034 

PAR4 001556 87054 

PARS 001570 87034 
PAR6 001602 1h td 
PAR? 001614 7034 
PAWCH = 10441 87034 
PIRQ = 17777, 7034 
PIRQVE= 000240 7034 
POINT = 017460 284 
POPRO = 012600 7034 
POP1SP= 005726 7034 
POP2SP= 022626 7034 8705 8710 9074 9153 
PRO = 000000 7034 
PRI = 000040 7034 
PR = 000100 7034 
PR = 000140 7034 
PR4 = 000200 87034 


[rn ee 


c 8 
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CNDZAA.P11 15=DEC=82 14:31 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0093 
PRS = 000240 87034 
PR = 000500 1A 8705 
PR = 000340 70 
PS = 177776 87034 
PSW = 177776 ht 
PUSHRO= 010046 870 
PUSH1S= 005746 87034 
SH2S= 024646 87034 
PWRVEC= 000024 87034 
RCVON = 010000 87034 8905 
= 000200 87034 
REGIST 001402 87034 
RESREG 006720 87054 
RESTAR 011024 87054 
RESVEC= 000010 87034 
RESOS = 104410 8703# 8705 
IE_ = 000100 87034 8727 8740 8753 9074 9127 
RINGO = 000001 87034 
RING1 = 000002 87034 
RING2 = 000004 87034 
RINGS = 000010 87034 
RLO = 000000 87034 
RL1 = 000400 87034 
RL = 001000 87034 
RL = 001400 87034 
RUN 001412 87034* 8705+ 
SAVACT 001410 8703#* 8705+ 
SAVLIN 001374 034 38 4* 8838+ 8560 8880* 8901*  8950* 8366* 8970* 8983+ 8991 9006 9029+ 
3* 053 9071* 9074* 9088* 9141 9154* eri 9279 
SAVNO 001416 8703#* 8705 
SAVNUM 001415 87034* 8705+ 
SAVPC 001404 87034  8705* 
SAVOS = 104407 87034 
SCOP1 = 104401 8703# 8710 8727 8728 8812 8820 8824 8877 8889 9022 9070 
RV.G 007062 87054 
SETAPT 011172 8703* 87054 
SETFLG= 104406 87034 
VEN = 000020 87034 
SEVENS= 000060 87034 
IFT = 104420 87034 8793 8824 8881 9030 9072 9155 
SILOAL= 020000 8703# 8729 
SILOEN= 010000 87034 8727 8740 
Ix = 000010 87034 
IxS = 000050 87034 
SPACNT 006223 87054 
TACK = 001120 87034 8705 
STKLMT= 177774 87034 
001446 87034 8705 
Sv05 005760 87054 
Ss 001304 8703#* 8705+ 
SWREG 000176 87034 
SWwO. == 000001 87034 
SwOO = 000001 1h A 
SwO1 = 000002 703# 8705 
SwO2 = 000004 87034 
swOS = 000010 87034 





SEQ 0094 
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|ENDZAA eet 0(1046) 15=DEC-82 14:36 PAGE 85-8 
ZAA.P11 15=DEC=82 14:31 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0095 
TPVEC = pon0ee 87034 
TRAPVE= 0000 870 
TROY = 100000 870 8729 8824 
TRTVEC= 000014 87034 
TRO 001436 87034 
TRI 001440 87034 
TR2 001442 87034 
TR3 001444 87034 
TSEVEN 002110 87034 
SIX 002112 87034 
11 012024 8705 
TST10 §=©.013160 8767 87684 ® 
TST11 = 013244 8768 87814 
TST1 013440 8781 88244 
TST1 013572 8824 88354 
TST14 014062 8835 88994 
TST1S 074404 88 
TST16 §=—014674 8980 90414 
TST17 5076 9 90744 
TST2 012214 8710 87164 4 
TST20 015472 9074 90854 9285 
TST21 = seeeee Y 9085 
TST3*® 012260 8716 87278 
TST4 012436 8727 87284 
TST5 012642 8728 87294 
TST6 012744 8729 
TST? 013074 8736 87674 
TTST nee 3 tate 87054 
TWOSTO= 7034 
TYPDAT 006706 87054 
PE = 104402 8703# 8705 9428 
TYPMSG 006576 87054 
T110 002054 87034 ; 
T1200 002066 87034 
134 002056 87034 
T150 002060 87034 
1800 002070 87034 
T2000 002072 87034 
T2400 002074 87034 
300 002062 87034 , 
T3600 002076 87034 
T4800 002100 87034 
T50 002050 87034 
T600 002 87034 
T7200 002102 87034 
175 002052 87034 
0021 87034 
VECMAP 011634 87054 
WRDCNT 006220 87054 
WTBS.F 006674 8705¢ 
XBX 006464 87054 
XCSR 004340 87054 
XERR spies! 87054 
AD 01006 8703 87054 
XMTCNT 001400 87034 
XMTLIN 001376 87034 
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1 2 14:31 


‘CNDZAA.P11 ~DEC= CROSS REFERENCE TABLE == USER SYMBOLS 
XPASS 004354 8705# 
XSTATQ 010152 8703 8705" 
‘XTSTN 007054 87058 
VEC 004346 87058 
xX = 160210 7038 
‘YY — = 000500 87038 
res 20 87038 
SAPTHD 001446 87038 
SASTAT= seeeee Y 705 
SATYC 005204 8705# 
SATY] 005160 87058 
$SATYS 0051 87058 
SATY4 005176 8705# 
SAUTOB 001300 87038 
SBASE 001174 B703#* 8705* 9396 9398s 
SBDADR 001266 87038 
SBDDAT 001272 87038 
$CDW1 001200 87038 8705 
001202 8703# 8705+ 
SCHARC 005154 8705#* 
017460 
SCMTAG 001244 87038 
$CM1 = 000006 87034 
$CM2 = 000014 87038 
SCM3 = 000006 87038 
cm4 = 000005 87038 
¢ 001146 87038 
SCRLF 001357 703# 8705 
DWO 001204 703# 8705 
Dw1 001206 87038 
$DDWI0 001230 87038 
$DDW11 001232 87034 
SDDW12 001234 87038 
SDDW13 001236 87038 
$DDW14 001240 87038 
$DDW15 001242 87038 
sue 001210 87038 
$DDW3 001212 87038 
Dua 001214 87038 
$DDWS 001216 87038 
DW6 001220 87038 
$DDW7 001222 87038 
$DDWB 001224 87038 
Dw9 001226 87038 
SDEVCT 001130 8703# 8705* 
EVM 001176 8703# 8705 
004334 87058 
= 000022 68628 87108 8716" 87274 87284 87298 8736" 87678 
8980" 90418 9074"  9085« 
SENDAD 004324 8703 87058 
SENDCT 004310 8705# 
SENV. 001140 8703# 8705 
SENVM 001141 87038 8705 
SEOP 004154 705# 9085 
SEOPCT 004302 7058 
SERFLG 001247 8703#* 8705* 


ke — ---—--- — Ct ee ere 


87684 


87814 


88244 


8835¢ 


SEQ 0096 


88998 
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CNDZA=A MACY11 30(1046) 
CNDZAA.P11 15=DEC-82 14:31 
| SERMAX 001261 87034 8705 
SER 006434 8703 87054 
SERRPC oo lees 8703#* 8705* 
|SERRTB 001362 7034 
‘SERTTL 001256 703#* 8705* 
/SETABL 001140 87034 
'SETEND 001244 87034 
'SFATAL 001122 7034 8705* 
‘SFFLG «005424 87054 
|SFILLC 001322 7034 8705 
‘SFILLS 001321 87034 8705 
| SFLIP = 177777 56764 87104 
88244 88254 
| SGDADR 001264 7034 
SGDDAT 001270 87034 
SGET42 004314 87054 
|SHD__ = 000001 8703 
SHIBTS 001446 87034 
SICNT 001250 870 8705* 
SILLUP 007472 87054 
SINTAG 001301 870 
SITEMB 001260 87034  8705* 
F 001360 87034 8705 
SLFLG 005423 8705#* 
SLPADR 001252 87034* 8705+ 
SLPERR 001254 87034 
SMADR1 001152 87034 
SMADR 901128 {At 
SMADRS 00116 7034 
SMADR4 001166 87034 
SMAIL 001120 87034 8705 
SMAMS1 001150 87034 
SMAMS2 001154 87034 
SMAMSS 001160 87034 
SMAMS4 001164 87034 
SMBADR 001450 87034 
SMFLG 005422 87054 
SMS 001134 87034  8705* 
SGLG 001136 87034  8705* 
SMSGTY 001120 87034  8705* 
SMTYP1 001151 87034 
SmTYP2 001155 87034 
SMTYPS 001161 87034 
SMTYP4 001165 87034 
SMXCNT 004632 87054 
= 000020 68614 87104 
8824" 8825 
9283 
SNULL_ 001320 87034 8705 
SNWTST= 87104 87164 
90414 9074# 
SOVER 00457 7054 
SPASS 001126 703#* 8705* 
SPASTM 0014 7034 
SPWRAD 0074 Ad 
SPWRON 007326 703 87054 


G 8 
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87114 87154 87278 87284 87294 
88344 88924 8898# 89748 89794 


8711 8716 87278 87284 87298 
88354 8892 8899# 8974 89804 


87274 87284 87298 8736# 87678 
90854 


87304 
90344 


8730 
9034 


87684 


87354 
90404 


87368 
90414 


87814 


87674 
90744 


87678 
90744 


88244 


87684 
90764 


87684 
9076 


8835« 


SEQ 0097 


87708 877948 
90844 


8770 87818 
9085¢ 92824 
8899e 89800 


CNDZA=A MACY11 30(1046) 15-DEC=82 14:36 PAGE 85-11 
CNDZAA.P11 15=DEC=-82 14:31 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0098 

007462 870S# 

007400 8705# 

001356 8703 8705 

001334 87038 

001356 8703" 8705* 9259 9267 

001330 8703" 8708" 9957 

001 $52 87038 8705 

001336 8703# 8705« 

001336 B708# 8708" 9265 9277 

001340 703# 8708 9963 9975 

004336 87058 

007476 8705es 

004370 8705# 

000000 8708 

004552 87058 

000020 87038 

164000 5683# 8703 8705 8710 8716 8727 8728 8729 8736 8767 8768 8781 8824 
8835-8899 «8980 ~=—«9061«S«s«9074~=«908S 

001142 8703" 8705 

000000 8708 

001124 8703 8705« 

001384 87038 8708* 

001312 87038 8705 

001310 8703" 8708 

001342 87038 

001344 8703#* 8705 

001346 8703#* 8708 

001350 870 

001382 370 

000021 8703@ 8710" 87168 87278 8728 87298 8736" 87678 8768# 87818 8824" 8835e 8a9oe 
B9B0# 90418 90742  9085# 

001316 87038 8705 

001323 87038 8708 

001314 87038 8705 

001452 7038 

001246 8703#* 8705* 8710" 8716* 8727+ 8728* 8729s 8736" 8767" 8768" 8781+ 8824e 8835e 
8899" 8980" 9041s 9074* 9085¢ 

004676 8705# 

008110 87058 

008156 87058 

001132 87038 

001486 87038 

001144 37038 

001170 8703#* 8705* 9399 94018 

001172 87038 

004430 87058 

000023 87038 

000000 87058 

017534 ~ oote 8705" 9100 «9108.-=«122s«t42s«KS SCC 2B 

ot 

006322 8703 87054 

004060 87038 

006412 8703 87050 

006050 8703 87084 

006024 8703 87084 

006270 8703 87084 
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CNDZAA.P11 C82 14:31 

,eDELAY 006302 8703 87054 
eDEVIC 006250 8703 87054 
|eERRTA 016034 8705 91594 
|eINSTE 005532 8703 87054 
i, INSTR 005426 8703 87054 
-INST1 005446 87054 

eLPRSE 006352 8703 87054 
| MSG 005450 87054* 

PARAM 005552 8703 87054 
-PARMD 011170 8703 87054 
-PAWCH 010304 8703 87054 
-RESOS 006012 8703 87054 
-SAVOS 005752 8703 87054 
-SCOPE 004370 8703 87054 
-SCOP1 004634 8703 87054 
-SETFL 010164 8703 87054 
SHIFT 006334 8703 87054 
»START 002116 87034 

-TRPSR 006226 8703 87054 
-TRPTA 001742 87034 870 
-TYPE 004660 8703 87054 
SASTA= teeeee 8705 

-$X = 001446 87034 
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pb 


2 Secsossagaces 


N“N 


o733 
8871 
9104 


8710 
9085 


8705 
8705 
87034 


8710 
9085 


8705 
9074 


8705 


8768 


8716 


8716 


8710 
9085 


9054 
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CROSS REFERENCE TABLE == MACRO NAMES 


8727 


8727 


8716 


9140 


8728 


8728 


8727 


8729 


8729 


8728 


8736 


8736 


8729 


8767 


8767 


8736 


8768 


8768 


8767 


8781 


8781 


8768 


8824 


8824 


8781 


8811 
9021 


8835 


8835 


8824 


Fs 


8899 


8835 


SEQ 0100 


8824 
9068 


8980 


8899 
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/CNDZAA.P11 
| 
|STLINE 85484 
iSTRPDE 65524 
ISTSTN 68644 
9074 
SUNI 83684 
SVARIA 65644 
$xZ 79214 
8834 
SSCMRE 87034 
SSCMTIM 87034 
SSESCA 17114 
SSNEWT 16624 
9041 
S$SKIP 17464 
-EQUAT 1894 
~HEADE 614 
-INIT 56584 
~SETUP 12134 
- SWRHI 1044 
-$ACT1 50644 
-SAPTB 51094 
-SAPTH 53704 
.SAPTY 554674 
-SASTA 54178 
-SCATC 932 
-SCMTA 10478 
-$DB2D 46864 
-$DB20 48124 
-SDIV 45874 
.SEOP 22144 
-SERRO 27004 
-SERRT 28968 
5 T 45234 
4 42294 
-SRAND 43074 
-SRDDE 38914 
-SRDOC 37978 
-SREAD 33954 
eSR2AZ 49584 
-SSAVE 39694 
-$SB82D 47714 
.-$S8 48744 
-$SC 24544 
-SSIZE 43614 
SUPR 49134 
STRAP 0734 
-STYPB 2874 
-STYPD 2094 
-STYPE  2985# 
-STYPO 31124 
-$40CA 9724 


56814 


56814 


56804 


000 
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8716 


8711 
8898 


8705 


8705 


8705 


8705 


8727 


8715 
8974 


8716 


CROSS REFERENCE TABLE <= 


8728 


8727 
8979 


8727 


8729 


8728 
9034 


8728 


8736 


8729 
9040 


8729 


MACRO NAMES 

8767 8768 
To: 
8736 8767 


8781 8824 
8767 §=—6.8768 
9084 

8768 8781 


8824 


8835 


“8980 


8824 


8899 


SEQ 0101 


8980 


ree rer ree 0 se se ee 
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| CNDZA=A merit 0(1046) _15=DEC=82 14:36 PAGE 86-2 
» NDZAA.P11 15=DEC=82 14:31 CROSS REFERENCE TABLE == MACRO NAMES SEQ 0102 


ERRORS DETECTED: 0 


eae ta et te TOC=CNMAC2.SML,CNDZAA.P11 
UN-TIME : 19 1_SECONDS 


3 
CORE USED: 50K (100 PAGES) 


